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1.0 ABSTRACT 


THIS IS A DESCRIPTION ON _— USING AND INTERPRETING THE 
PDM70 DIAGNOSTIC PROGRAM. THE PROGRAM IS_ COMPRISED OF 
TWENTY-THREE KEYBOARD eee TESTS WHICH TEST AND AID_IN 
CHECKOUT OF THE PDM70 SYSTE THE PROGRAM IS STRUCTURED TO GIVE 
THE USER THE OPTION OF TESTING ANY OF THE MODULES COMPRISING THE 
PDM70 ON AN INDIVIDUAL OR SYSTEM TEST BASIS. 


THE DIAGNOSTIC PROGRAM RESIDES IN A PDP=11 AND IS INTERFACED VIA 
A DL11 (ASYNCHRONOUS SERIAL LINE) TO THE PDM70. THE PDP=-11 IS 
USED AS A COMBINATION CONTROL, SOURCE AND DESTINATION MODULE. 


EACH MODULE TEST PROGRAM IS INDIVIDUALLY OUTLINED IN_ THIS 
WRITE-UP. THE SCE LOOPING TECHNIQUE AND MODULE ADDRESSING 
SCHEME IS IN GENERAL THE SAME FOR ALL MODULES WITH ANY UNIQUE 
CHARACTERISTICS POINTED OUT IN THE MODULE OUTLINE. 


THE CONSOLE TELEPRINTER IS USED TO SELECT THE TEST PROGRAMS AND 
TO CONTROL Pn DIAGNOSTIC. THE DIAGNOSTIC RUNS IN THREE MODES; 
MONITOR, WAIT AND RUN. 


THE "MONITOR MODE’ IS ENTERED WHEN THE PROGRAM IS_ LOADED OR AT 
ANY TIME A NEW TEST IS TO BE SELECTED. HERE THE PROGRAM WAITS, 
2 Rie THEN EXECUTES THE SELECTED TEST TYPED IN FROM THE 
K BOAR . 


WHEN THE ‘WAIT MODE’ IS ENTERED THE PROGRAM HAS TO WAIT FOR ANY 
PARAMETERS (SUCH AS A MODULE ADDRESS) TO BE INPUTTED, A SIGNAL TO 
BE SCOPED OR TO STOP PROGRAM EXECUTION IF AN ERROR IS DETECTED. 
THE "RUN MODE’ IS WHEN THE PROGRAM IS ACTUALLY EXECUTING A_ TEST 
PROGRAM. 

THE TELEPRINTER KEYBOARD IS ALWAYS ACTIVE AND WILL RESPOND TO ANY 
KEYBOARD INPUT. ALL USERS RESPONSES ENTERED MUST END WITH A ‘CR' 


MAY BE USED TO ERASE ANY PREVIOUSLY ENTERED CHARACTERS. 
IF RUBOUT IS TYPED, THE ERASED CHARACTER WILL BE ECHOED BACK. 


2.0 REQUIREMENTS (EQUIPMENT) 


PDM70 MOTHER BOARD. 
ytd neg (M7379-SET TO CORRESPOND TO THE DL11 FREQ.) 


PDP-11 W/DLT1 & 8k OF MEMORY 
CONSOLE TELEPRINTER 
PDM70 INTERFACE MODULE 


A. THIS CAN EITHER BE A DF11 OR A SERIAL I/0 MODULE 
(M7385) 





3.0 LOADING PROCEDURE 
1. USE STANDARD PROCEDURE FOR LOADING BINARY TAPES. 


STARTING PROCEDURE 
1. ALA PROGRAM IS SELF STARTING WITH A RESTART ADDRESS 
OF * Pe 


TELEPRINTER CONTROL SWITCHES 
RETURN TO MONITOR (“C)* 
TYPING A **C* AT ANY TIME WILL ENABLE THE PROGRAM TO 
RETURN TO THE KEYBOARD MONITOR AND WAIT FOR A NEW TEST 
TO BE ENTERED. 
CONTINUE (C) 
IF A **C* HAS BEEN TYPED, RETURNING CONTROL TO_ THE 
KEYBOARD MONITOR, AND THE USER WISHES TO RESTART THE 
LAST TEST HE WAS RUNNING, HE CAN SIMPLY TYPE 'C' 
CARRIAGE RETURN AND CONTINUE WITHOUT HAVING TO RE-TYPE 
THE TEST NAME. 
RESTART (“R)* 
TYPING A ‘*R* WILL ENABLE THE CURRENT TEST TO BE 
RESTARTED. IF A ‘*R' IS TYPED WHILE IN MONITOR MODE, 
THE ENTIRE TEST PROTOCOL IS RETYPED. 
MODULE ADDRESS UPDATING (“A)* 


TYPING A **A* WHILE RUNNING ANY OF THE MODULE PROGRAMS 
WILL ENABLE A NEW MODULE ADDRESS TO BE ENTERED. 


EXIT WAIT MODE (CR) 


TYPING ‘CR*® WILL ENABLE THE PROGRAM TO CONTINUE FROM THE 
WAIT MODE. 


* ALL CONTROL CHARACTERS ARE OBTAINED BY TYPING THE ‘CTRL AND THE 
CHARACTER DESIGNATED* KEYS SIMULTANEOUSLY. 


= Se ese Se SE See 
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6. SUPPRESS PRINTING (*G) 
TYPING A ‘**O* TELLS THE COMPUTER TO SUPPRESS THE REST OF 
THE TELEPRINTER OUTPUT. FOR INSTANCE, IF THE COMPUTER 
WAS TYPING OUT A MESSAGE AND THE USER KNEW WHAT THE 
oe WAS GOING TO BE, HE COULD TYPE A ‘*O" AND ENABLE 


THE PROGRAM TO CONTINUE WITHOUT WAITING FOR. THE ENTIRE 
MESSAGE TO BE PRINTED. 


6.0 CONSOLE SWITCH SETTINGS 

WHEN THE EXERCISER TEST OR A DIAGNOSTIC TEST IS 

STARTED, THE PROGRAM WILL DETERMINE IF THE PROCESSOR 

HAS A HARDWARE SWITCH REGISTER (SWR). IF THERE 

IS NO HARDWARE SWR, THE PROGRAM WILL USE THE SOFTWARE 

SWR LOCATED AT ADDRESS 176. THE OPERATOR SHOULD SET 

UP LOC 176 BEFORE STARTING THE PROGRAM WITH THE 

APPROPRIATE VALUE. 

SWITCH FUNCTION 

ENTER THE ‘WAIT MODE" AND WAIT FOR 'CR" 
ON ERROR DETECTION 
CONTINUE ON ERROR 
CONTINUE ON TO NEXT SUBTEST 
LOOP ON CURRENT SUBTEST 
ENABLE PRINTOUTS 
INHIBIT PRINTOUTS 
NORMAL DL11 TRANSMISSION 
ENTER THE ‘WAIT MODE’ AND WAIT FOR A 
*CR® TO TRANSMIT EACH CHARACTER. AS 
EACH CHARACTER IS TRANSMITTED IT IS ALSO 
PRINTED. 
NORMAL DL11 TRANSMISSION 


TRANSMIT THE CURRENT CHARACTER UNTIL 
SW11 IS RESET TO ‘O°. 


RUN THE ENTIRE MODULE TEST PROGRAM 


INHIBIT THE MANUAL INTERVENTION TESTS IN 
THE MODULE TEST PROGRAM 


NORMAL DL11 TRANSMISSION 
INHIBIT TRANSMITTER DELAY 


— 


on at Et OOH 


1 
1 
" 
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(SCOPE LOOPING AID) 


NOTE: THE FUNCTIONS OF THE LOWER BITS (0-8) VARY IN USAGE «AND 
ARE OUTLINED IN THE APPLICABLE TEST DESCRIPTIONS. IN 
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GENERAL THOUGH, DATA SWITCHES '‘O=-3' ARE USED IN THE 
EXERCISER TESTS TO ENABLE THE USER TO SELECT «ANY 
yg! a MODULE MODE. IN THESE CASES, THE PROGRAM ADDS 

CODE OF ‘60° TO THE be cates READ FROM THE SWITCHES TO 
REPRESENT AN ASCII NUMBER 


IF THE PROGRAM IS USING THE SOFTWARE SWR, THE 

OPERATOR MAY CHANGE THE SWITCH SETTINGS FROM THE 

TTY. AFTER SELECTING A TEST OR TYPING ‘C* IN THE MONITOR MODE, 
THE PROGRAM WILL OUTPUT AT THE TTY THE FOLLOWING 

MESSAGE 


SWR=XXXXXX 
NEW SWR= 


THE OPERATOR MAY THEN ENTER THE NEW VALUE. 
CARRIAGE RETURN ENTERS THE UPDATED VALUE. 
IF NO VALUE HAS BEEN ENTERED, THE SWITCH 

REGISTER VALUE REMAINS UNCHANGED. 


WHILE SCOPE LOOPING ON SUBTEST, THE OPERATOR MAY 
INTERRUPT THE TEST TO CHANGE THE SWITCH SETTINGS 
BY TYPING CONTROL-G AT THE TTY. THE PROGRAM WILL 
OUTPUT AT THE TTY THE FOLLOWING MESSAGE 


SWR=XXXXXX 
NEW SWR= 


THE OPERATOR MAY THEN RESPOND AS DESCRIBED IN THE 
PRECEDING PARAGRAPH. 


7.0 SERIAL I/O INPUT OPTION 


AS MENTIONED IN THE ABSTRACT, THE PDM70 MODULES CAN BE TESTED IN 
TWO MODES; PER MODULE BASES OR SYSTEM TEST. IF THE MODULE IS 
TESTED INDIVIDUALLY A as IS PLUGGED DIRECTLY INTO THE CONTROL 
SLOT OF THE PDM70 MOTHER BOARD. THIS ENABLES THE PDP-11 TO ACT 
AS A COMBINATION CONTROL, SOURCE AND DESTINATION MODULE. IN THIS 
CASE, THE SYSTEM CLOCK MUST BE SET TO CORRESPOND TO THE CLOCK 
FREQUENCY OF THE DL11. 


WHEN THE MODULE IS TESTED IN A ao ENVIRONMENT , THE BASIC 
SYSTEM CONFIGURATION CONSISTS OF CONTROL, CLOCK, ‘KGM' 
(KNOWN GOOD SERIAL INPUT/OUTPUT MODULE) AND A 'MUT' (MODULE UNDER 
TEST). THE ‘KGM* SHOULD BE VERIFIED AS SUCH BY TESTING IT WITH 
THE M73851 TEST (REFER TO SECTION 12.13). THE ‘KGM' CAN BE 
INSERTED IN ANY MODULE SLOT AND THEN CABLED TO THE DL11 OUTPUT OF 
THE PDP~11, THIS MODULE IS TO BE SET UP WITH THE "D'' JUMPER OUT 
AND THE ‘L** JUMPER IN SO THAT IT IS INITIALIZED ON POWER UP. THE 
SYSTEM CLOCK MUST BE SET EITHER EQUAL TO OR GREATER THAN, THE 
INPUT DEVICES (E.G. DL11) BAUD NOTE. PROGRAMS ARE THEN SENT 
FROM THE PDP-11 STORED IN THE CONTROL MODULE. 


NOT OBVIOUS TO THE USER IS THE EXTRA ADDRESSING WHICH IS ‘PADDED' 








I 

IN WHEN THE SERIAL 1/0 MODULE IS USED. THIS PADDING SERVES TWO 
FUNCTIONS. FIRST, IT FACILITATES LOADING A_ LEGAL PROGRAM 
THE CONTROL MODULE ‘FIFO’ (FIRST-iN, FIRST-OUT BUFFER). 

MEANS STARTING EACH PROGRAM WITH AN ‘STX' AND ENDING IT WITH AN 

PADDING ISN'T NECESSARY WHEN THE MODULE IS TESTED ON A 

ALSO, EXTRA ADDRESSING MUST BE ADDED TO _ ADDRESS 

HE PROGRAM HAS TO BE CERTAIN THAT THE ‘KGM' NEVER 

INTERFACE TO 

BY SETTING DATA SWITCH 12, THE USER CAN SINGLE STEP 

eS ae TEST PROGRAM AND EXAMINE WHAT THIS PADDED PROGRAM 

LIKE. 


WHEN THE PROGRAM IS STARTED, IT ASKS iF A SERIAL I/0 IS _ BEING 
USED. IF IT IS, TYPE ‘YES’ OR ‘Y' CARRIAGE RETURN. IF IT'S NOT, 
TYPE "NO', "N' OR SIMPLY 'CR*. THIS PARAMETER CAN BE CHANGED AT 
ANY TIME BY TYPING A ‘**R" WHILE IN THE MONITOR MODE. 


IF THE *KGM* I/O IS BEING USED, THE PROGRAM WILL THEN ASK FOR THE 
ADDRESS OF THIS MODULE. THIS CAN BE ANY ADDRESS EXCEPT ‘17° 
WHICH FIT THE GUIDE LINES DESCRIBED IN SECTION 9.0 (MODULE 
ADDRESSING). 


8.0 DL11 ADDRESS SETUP PROCEDURE 


AFTER SETTING, up THE SERIAL 1/0 OPTION, THE PROGRAM PRINTS ‘DL11 
AD VEC THIS ENAB THE USER TO SELECT HIS OWN DL11 

THE DEFAULT 
RCSR ADDRESS OF $00" ARE USED. 
IF THESE ADDRESSES ARE TO BE MODIFIED. TYPE THE RCSR ADDRESS AND 
THE VECTOR ADDRESS SEPERATED BY A COMMA, 


THE USER SHOULD NOTE THAT BOTH THE DL11 AND THE SERIAL I/0 MODULE 
ARE NORMALLY SETUP FOR 7 BIT EVEN PARITY. 


9.0 MODULE ADDRESSING 


WHEN A MODULE PROGRAM IS SELECTED, THE PROGRAM REQUESTS THE 
MODULE ADDRESS BEFORE THE TEST IS RUN. THIS ADDRESS CAN BE ANY 
NUMBER FROM 'O-17'*. THE ONLY RESTRICTION IS THAT IF THE SERIAL 
INPUT OPTION IS BEING USED, THESE TWO MODULE ADDRESSES MUST NOT 
CONFLICT. IF THEY DO, A NEW MODULE ADDRESS WILL BE _ REQUESTED. 
TYPING A ‘*A* AT ANY POINT WHILE A MODULE PROGRAM IS RUNNING WILL 
CAUSE THE PROGRAM TO REQUEST A NEW MODULE ADDRESS. 


10.0 MODULE ERRORS 


WHEN A MODULE ERROR IS DETECTED, THE FAILING SUBTEST NUMBER, 
(MEMORY ADDRESS) WHERE ERROR OCCURRED AND A DESCRIPTIVE MESSAGE 
OF THE FAILURE ARE TYPED OUT. THE PROGRAM THEN ENTERS THE ‘WAIT 
MODE’ UNTIL A 'CR* IS TYPED ENABLING THE PROGRAM TO CONTINUE. 


WHEN AN ERROR IS DETECTED, THE "M.A." SHOULD BE USED TO LOCATE 
THE FAILING SUBTEST IN THE LISTING. HERE THE USER WILL FIND A 
WRITTEN DISCRIPTION OF WHAT THE SUBTEST WAS ATTEMPTING TO ODO. 
THE TEST CAN THEN BE ANALYZED AND THEN LOOPED IF NECESSARY UNTIL 
THE FAILURE IS FIXED. 


WHEN A MODULE IS FAILING THE FIRST SUBTEST, IT IS A GOOD IDEA 10 
RE~CHECK THE MODULE TO MAKE SURE THAT IT WAS SET UP CORRECTLY 


WITH THE CORRECT SWITCH & JUMPER SETTINGS. THE IDEAL SITUATION, 
IF POSSIBLE, WOULD BE TO FIRST TEST A KNOWN GOOD MODULE. 


11.0 SCOPE LOOPING 
EACH MODULE ADDRESS TEST PROGRAM IS COMPRISED OF ANY NUMBER OF 


* THE MODULE ADDRESS IS INTERPRETTED AS AN OCTAL VALUE. 
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INDIVIDUAL SUBTESTS. WHEN A MODULE PROGRAM IS RUN THESE SUBTESTS 
ARE RUN AS A WHOLE, OTHERWISE, WHEN ONE SUBTEST FINISHES THE NEXT 
SUBTEST IS EXECUTED. 


THERE ARE TWO WAYS OF RUNNING ANY SELECTED SUUBTEST; THE USER 
MAY RUN THE ‘SUBX" ROUTINE (REFER TO SECTION 13.1) OR RUN THROUGH 
E PROGRAM UNTIL THE SELECTED SUBTEST IS_ REACHED. 


BE LOOPED IN THE CONSOLE SWITCH REGISTER AND START THE MODULE 
PROGRAM. THE PROGRAM WILL TYPE ‘SCOPE BREAK AT XXX‘ WHEN THE 
SUBTEST IS REACHED. NOW SET CONSOLE SWITCH '14' TO LOOP ON _ THE 
CURRENT SUBTEST AND THEN TYPE ‘CR'. THE PROGRAM WILL THEN RUN 
THE SELECTED SUBTEST UNTIL SWITCH ‘14° IS RESET TO ‘O* ENABLING 
THE PROGRAM TO CONTINUE. 


12.0 MODULE TEST PROGRAMS 


THE FOLLOWING IS A LIST AND DESCRIPTION OF ALL THE MODULE 
PROGRAMS. IT SHOULD BE NOTED THAT IN THE PROGRAM TEST PROTOCOL 
EACH MODULE PROGRAM ENDS WITH A LETTER. THIS LETTER INDICATES 
THE TYPE OF TEST; AL = ADDRESSING, C = CALIBRATION*, E = 
EXERCISER, G = GAIN*, I = INTERFACE, R = REPEATIBILITY*. 


THE MODULE ADDRESS TEST SHOULD BE RUN AND_ PROVED FULLY 
OPERATIONAL BEFORE RUNNING ANY OF THE OTHER TESTS. THIS TEST 
VERIFIES THAT THE MODULE CAN BE ADDRESSED AND THAT IT WORKS 
"FUNCTIONALLY IN ALL ITS INTENDED DATA MODES. 


THE USER SHOULD REFER TO THE ENGINEERING SPECIFICATIONS TO VERIFY 
i AND JUMPERS ARE SET UP CORRECTLY BEFORE RUNNING 


NOTE: BEFORE EACH MODULE TEST IT IS A GOOD PRACTICE TO CLEAR OUT 
THE PDM FIFO BY HITTING THE ‘RESET’’ BUTTON ON THE FRONT PANEL. 


***ALSO NOTE: IF THE PROGRAM IS USING THE SOFTWARE SwR, 
REFER TO SECTION 6.0. 


12.1. M7380A, CONTROL MODULE TEST 


THIS PROGRAM TAKES THE CONTROL MODULE THRU the INITIALIZATION, 
ADDRESS AND DATA MODES tp ae INITIALLY, TWO PROGRAMS ARE 
STORED IN THE CONTROL MODULE ‘FIFO'. THE SECOND PROGRAM 
HEADED WITH A ‘DC4* SO IT WILL NOT BE RECIRCULATED. 

FIRST PROGRAM IN THE DATA MODE, A ‘500° WORD RANDOM DATA BUFFER 
IS CIRCULATED THRU THE CONTROL MODULE. AFTER VERIFYING THE DATA, 
AN ‘EOT' IS ISSUED. THIS ENABLES THE SECOND PROGRAM TO BE CALLED 
OUT. | THE DATA MODE IS AGAIN CHECKED AND ANOTHER 'EOT' IS ISSUED 
ENABLING THE FIRST PROGRAM IS BE RE-CALLED. ONCE VERIFIED, 
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SEQ 0010 





* APPLY TO THE A/D MODULE ONLY. 


SEQ 0011 
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ANOTHER "EOT' IS ISSUED. A CHECK IS THEN MADE THAT THE SECOND 
PROGRAM, HEADED WITH A ‘DC4', NO LONGER EXISTS . THE ‘FIFO" IS 
THEN REPROGRAMMED. 


THIS PROGRAM CONSISTS OF ‘64° CHARACTERS ENABLING THE CONTROL 
"FIFO" TO BE COMPLETELY FILLED. THE PROGRAM CONSISTS OF ONE 
SOURCE AND ONE DESTINATION ADDRESS. THE REMAINING 55 LOCATIONS 
ARE FILLED WITH RANDOM LITERAL CHARACTERS. THE PROGRAM IS THEN 
CALLED OUT AND VERIFIED. 


THE LAST TEST CHECKS THE DELAY TIMES OF THE '‘SYN' CHARACTER. 
THIS TEST REQUIRES A ‘110 BAUD' CONSOLE DEVICE SUCH AS A_‘TTY'_IN 
ORDER TO RUN. THE CRYSTAL CLOCK IN THE TTY IS USED TO TIME THE 
"SYN" DELAYS. IF THE CONSOLE DEVICE IS NOT AVAILABLE, THIS TEST 
WILL NOT PASS. ALL THE DELAYS, 1-9, ARE TESTED IN ORDER. __ THE 
TESTS MAKES TWO CHECKS AT EACH DELAY. FIRST, THAT THE DELAY 
ISN'T TOO SHORT AND SECOND, THAT THE DELAY ISN'T TOO LONG. 


THIS COMPLETES THE CONTROL MODULE TESTS. HOWEVER, IF DATA Sw10 


MODULE (1). OTHERWISE, THE MESSAGE "TEST COMPLETE’ IS_ PRINTED 
AND THE PROGRAM WILL CONTINUE TO CYCLE THRU THE CONTROL TEST 
UNTIL STOPPED. 


1. M7387, HARDWARE READ-IN MODULE 


AS MENTIONED ABOVE, THIS TEST IS RUN IN CONJUNCTION WITH 
THE M7380A 15ST. THE TEST REQUIRES THE USER TO INSERT 
THE M7387 MODULE WITH A DIAGNOSTIC ‘PROM’ PROGRAM INTO 
SLOT 'PS* OF THE MOTHER BOARD. 


AFTER THE ‘age | HAS BEEN INSERTED, THE PDM70 SHOULD BE 
POWERED UP. THIS WILL ENABLE THE PROM PROGRAM TO BE 
READ OUT, STORED IN THE CONTROL MODULES FIFO, AND THEN 


EXECUTED. 
THE PROM PROGRAM IS SETUP TO ADDRESS THE SERIAL 1/0 
DESTINATI THEN SEND LITERAL DATA. AFTER 


NATION MODULE AND 
VERIFING THE DATA, THE MESSAGE ‘PROM OK'' IS TYPED. IF 
THIS MESSAGE IS NOT TYPED IMMEDIATELY AFTER POWER UP, NO 
eee EVER RECEIVED, THUS INDICATING AN ERROR 


12.2. M7381A, BCD INPUT MODULE ADDRESS TEST 


THIS TEST ADDRESSES THE ‘BCD’ MODULE IN ALL FOUR(4) DATA MODES 
VERIFYING INTERNAL AND EXTERNAL DEVICE FLAG OPERATION. IT IS 
SUGGESTED THAT THE M7381E TEST SHOULD BE RUN IF ANY DATA _ ERRORS 
ARE REPORTED. HERE THE USER CAN READILY IDENTIFY THE DATA ERROR 
BY THE TYPEOUT. THE CUSTOMER SWITCHES (WHICH SELECT HOW MANY 
DIGITS ARE READ) ARE TESTED BY THE PROGRAM REQUESTING UNIQUE 
SWITCH SETTINGS. SETTING DATA *SW10" WILL INHIBIT THE MANUAL 
INTERVENTION TESTS. THIS MODULE HAS TO BE TESTED WITH THE ‘L’ 


SEQ 0012 
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JUMPER OUT. 


12.3. M7381E, BCD INPUT MODULE EXERCISER TEST 


THIS PROGRAM CONTINUOUSLY LOOPS ADDRESSING THE BCD MODULE AND 
PRINTING THE RECEIVED DATA. DATA SWITCHES '0 & 1° ARE USED TO 
SELECT ANY ONE OF THE FOUR (4) "BCD" DATA MODES. _ THE SWITCH 
SETTINGS MAY BE SET AND RESET ANY TIME. DATA SW13 CAN ALSO BE 
SET TO INHIBIT THE DATA PRINTOUT. 


12.4. M7382A, BCD OUTPUT MODULE ADDRESSING TEST 


mata TEST IS COMPRISED OF A SERIES OF SUBTESTS WHICH OUTPUT KNOWN 
DATA TO THE ‘BCD* OUTPUT MODULE. ONCE THE DATA IS TRANSMITTED, 
THE USER IS NOTIFIED OF THE TRANSMITTED PATTERN. THE PROGRAM 
THEN ENTERS THE ‘WAIT* MODE ENABLING THE USER TO VERIFY THE DATA. 


THE LAST SUBTEST REQUESTS FOR THE USER TO SCOPE FOR THE SIGNAL 
‘OUTPUT DONE H & L*. THE PROGRAM WILL INDEFINITELY HANG IN THIS 
SUBTEST UNTIL EITHER '*R' IS TYPED TO RESTART THE M7382A TEST OR 
**C* IS TYPED TO RETURN TO THE MONITOR. 


12.5. BCD I/O TEST 


THIS IS AN EXERCISE TEST UTILIZING BOTH THE BCD ‘INPUT & OUTPUT’ 
MODULES. | AN INCREMENTING BCD COUNT IS SENT TO THE OUTPUT MODULE 
AND D AROUND VIA A SPECIAL CABLE TO THE INPUT MODULE. __THE 
INPUT MODULE IS THEN ADDRESSED, ENABLING THE DATA TO BE READ. 
THE RECEIVED DATA IS VERIFIED AGAINST THE TRANSMITTED DATA. THIS 
TEST VERIFIES THAT ALL DATA LINES ARE GOOD AND THAT NO TWO LINES 
ARE SHORTED TOGETHER. 


THE INPUT MODULE CAN BE SET UP TO USE EITHER INTERNAL OR EXTERNAL 
SYNC. IF EXTERNAL SYNC IS SELECTED, THE SYNC SIGNAL IS SUPPLIED 
FROM THE BCD OUTPUT MODULF VIA THE CABLE. 


12.6. M7383A, A/D MODULE ADDRESS TEST 


THIS TEST ADDRESSES THE A/D MODULE AND VERIFIES THE CORRECT DATA 
FORMAT IS RECEIVED FROM THE MODULE. THE EXTERNAL SYNC FUNCTION 
IS ALSO TESTED. IT SHOULD BE NOTED THAT THIS TEST MAKES NO 
ATTEMPT TO VERIFY WHEATHER OR NOT THE A/D IS CONVERTING THE 
CORRECT VALUES. 


12.7. ™7383C, A/D CALIBRATION ROUTINE 


SEQ 0013 
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SEQ 0014 


THIS TEST RUNS IN A CONTINUOUS LOOP ADDRESSING THE A/D MODULE AND 

AFTER ACCEPTING THE MODULE 
ADDRESS, THE PROGRAM TYPES ‘REMOTE DST.?°’. THIS IS AN OPTION 
WHICH ENABLES THE USER TO SEND THE CONVERSION DATA TO A USER 
SELECTED DESTINATION, “Te AS THE DISPLAY. IF THIS OPTION IS 
DESIRED, TYPE ‘YES' OR ‘Y* & ‘CR*. A REQUEST WILL_THEN MADE FOR 
THE ADDRESS OF THIS DESTINATION. DATA SWITCHES 'O-3' ARE USED TO 
SELECT THE A/D CHANNEL TO BE CONVERTED. SETTING DATA SwW13 WILL 
INHIBIT THE CONVERSION DATA PRINTOUT. ALL DATA SWITCHES MAY BE 
SET OR RESET AT ANY TIME. 


CHANNEL SELECTION IS AS FOLLOWS: 


DATA Sw'S ‘O-1"° SELECT ‘INT. SYNC* ON CH.'S 0,1 
DATA Sw'S ‘2° & ‘O-1" SELECT ‘EXT SYNC* ON CH.'S 
DATA Sw ‘3° SELECTS “INT SYNC’ CONVERSION ON ALL 
DATA SW'S ‘283° SELECT "EXT. SYNC* CONVERSION ON 


12.8. M7383G, A/D GAIN ACCURACY TEST 


THIS TEST IS USED TO TEST THE GAIN ACCURACY OF THE A/D. FIVE 
SPECIFIC VOLTAGES AT A GAIN OF ‘'l'' ARE REQUESTED BY THE PROGRAM. 
WHEN THE VOLTAGE AND GAIN HAVE BEEN SUPPLIED, TYPE ‘CR’. A 
SERIES OF ONE HUNDRED CONVERSIONS ARE THEN TAKEN AND AVERAGED. 
THIS AVERAGE IS THEN TESTED TO BE WITHIN ‘+ OR -* ONE COUNT FROM 
THE TRUE VOLTAGE VALUE FOR THAT SPECIFIED SETTING. IF IT IS NOT, 
THE LOW, AVERAGE AND HIGH VALUES OBTAINED ON _ THAT PARTICULAR 
GROUP OF CONVERSIONS ARE TYPED OUT. THE PROGRAM WILL THEN TAKE 
ANOTHER SERIES OF CONVERSIONS AND WILL CONTINUE DOING SO, UNTIL 
THE CORRECT VALUE IS RECEIVED. AT THAT POINT THE PROGRAM WILL 
REQUEST A NEW SETTING. DATA SWITCH '13° CAN BE SET TO _ INHIBIT 
THE ERROR DATA PRINTOUT. 


12.9. M7383R, A/D REPEATIBILITY TEST 


THIS TEST TAKES A SERIES OF ONE HUNDRED CONVERSIONS ON A_ USER 
SELECTED CHANNEL. THE CONVERSIONS ARE AVERAGED AND _ THEN 
DISPLAYED IN A GRAPH FORMAT SHOWING THE _REPEATIBILITY 
CHARACTERISITICS OF THE A/D. AFTER ACCEPTING THE MODULE ADDRESS, 
THE PROGRAM TYPES ‘REMOTE DST.?''. THIS IS A OPTION WHICH ENABLES 
THE USER TO SEND THE COMPUTED A/D GRAPH TO A USER on ie | 
DESTINATION. IF THIS OPTION IS DESIRED, TYPE '‘YES' OR & 
"CR'. A REQUEST WILL THEN BE MADE FOR THE ADDRESS oF ig 
DESTINATION. WHEN STARTED, THE TEST “aw pei A CHANNEL AND V. ‘2 
(VERTICAL SCALE _ FACTOR). THE IS_ THE NUMBER 
CONVERSIONS, OF THE HUNDRED, = BE AVERAGED TOGETHER TO REPRESENT 
ONE POINT ON THE GRAPH. THE V.S.F. CAN BE ANY NUMBER EVENLY 
DIVIDED INTO ONE HUNDRED. EACH POINT (REPRESENTEND AS_ AN 
ASTRICK) IS PLOTTED IN ITS RELATIONSHIP TO THE OVERALL AVERAGE OF 
THE HUNDRED CONVERSIONS. THE FOLLOWING IS AN EXAMPLE OF WHAT A 
GRAPH PRINTOUT MIGHT LOOK LIKE USING A V.S.F. OF 10; 10 POINTS, 
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EACH REPRESENTING THE AVERAGE OF °10° CONVERSIONS. 


EXAMPLE : 


VSF? 10 
CH.? 1 


ae epee ea eee 


F++eeeesete 4444444444 (SCALE=IMV/DIV) 
-141 -150 -159 


THE THREE NUMBERS AT THE BOTTOM OF THE SCALE (RIGHT TO LEFT) 
REPRESENT; THE LOWEST VALUE, THE OVERALL AVERAGE AND THE HIGHEST 
VALUE READ OF THE ONE HUNDRED CONVERSIONS. SINCE THE GRAPH ONLY 
SHOWS COUNTS ‘+ & -" 9 COUNTS FROM THE AVERAGE, AN OVERRANGE ‘HI 
& LO* PRINTOUT WOULD RESULT IF ANY COUNTS FALL OUT OF THE 9 COUNT 
RANGE 


12.10. ™M7384A, D/A ADDRESSING TEST 


THIS TEST STARTS BY ADDRESSING THE DIA MODULE USING MODES ‘8 & 
9". THE USER IS THEN REQUESTED TO SCOPE THE SIGNALS PROG ‘L & 
Ww". FIVE "pai VOLTAGE ARE THEN TRANSMITTED FROM THE D/A_ ON 
EACH CHANNEL. AFTER EACH VOLTAGE IS TRANSMITTED, A MESSAGE IS 
TYPED TELLING THE USER THE VOLTAGE AND CHANNEL. THE LAST SUBTEST 
CHECKS THE RECOVERY OF THE D/A. THIS IS DONE BY CONTINOUSLY 
ADDRESSING THE DAC IN MODE 3 (BOTH CHANNELS). THE PROGRAM THEN 
ALTERNATLY OUTPUTS ‘O* VOLTS AND °9.5" VOLTS. THIS ENABLES A 
SQUARE WAVE OUTPUT FROM THE D/A. THE USER IS REQUESTED TO SCOPE 
BOTH CHANNEL OUTPUTS AND CHECK FOR A 5 U SECOND. RISE TIME. 


THE PROGRAM WILL INDEFINITELY HANG IN THIS SUBTEST UNTIL 
RESTARTED OR EXITED. 


12.11. M7384E, D/A EXERCISER TEST 
THIS TEST ENABLES ANY USER SELECTED VALUE TO BE TRANSMITTED FROM 


THE D/A. WHEN SELECTED, THE TEST REQUESTS FOR TWO, THREE DIGIT 
VALUES (SEPARATED VIA COMMA'S) TO BE TYPED IN. THE FIRST VALUE 
IS THE ONLY ONE TRANSMITTED WHEN RUNNING ONE CHANNEL. IF BOTH 


SEQ QUIS 
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CHANNELS ARE ig iy THE FIRST VALUE WILL BE _ TRANSMITTED ON 
CHANNEL '‘O' AC) AND THE SECOND VALUE WILL BE TRANSMITTED ON 
CHANNEL “oe DAC) « THE CHANNELS ARE SELECTED BY DATA SWITCHES 
*O & 1° AND CAN BE SET AND RESET AT ANYTIME. SETTING DATA SWITCH 
‘O" WILL SELECT CHANNEL 'O'. SETTING DATA SWITCH ‘1° WILL SELECT 
CHANNEL 1 AND SETTING BOTH ‘0 & 1° WILL SELECT BOTH CHANNELS. 


TYPING A '*R* WILL ENABLE FOR A NEW SET OF DAC VALUES TO BE 
ACCEPTED. 


12.12. M7385A, SERIAL 1/0 ADDRESS TEST 


THIS TEST CHECKS BOTH THE SOURCE AND DESTINATION PARTS OF THE 
SERIAL I/0. BY USING A SPECIAL WRAPPING CABLE, THE DESTINATION 
OUTPUTS TO THE SOURCE INPUT. 


BEFORE TESTING, ALL *ACTIVE’ RECEIVER —— MUST BE INSERTED 
AND THE 'D’ & *L* "MR" JUMPERS MUST BE OU 


THIS TEST CHECKS ONLY THE ‘EIA* OUTPUT OF THE MODULE. REFER TO 
THE M7385T TEST (12.14) FOR TESTING THE ‘‘TTY’’ OUTPUT LOGIC. 


IT SHOULD BE NOTED THAT WHEN THIS TEST IS RUN USING THE SERIAL 
1/0 INPUT OPTION, THAT ONLY SUBTESTS ‘1,5 & 10°' ARE EXECUTED. 
poe He og THE TESTING ISN'T TESTED AS IT IS WHEN USING THE DF11 
IN ACE. 


IT SHOULD ALSO BE NOTED THAT WHEN THE SERIAL INPUT OPTION IS 
USED, SUBTEST 5 RETURNS ONE HUNDRED AND TWENTY EIGHT CHARACTERS 
(128) TO THE DL11 RECEIVER INSTEAD OF ‘‘64"' THE FIRST ‘'64"' 
CHARACTERS OF THE BUFFER ARE RETURNED DIRECTLY FROM THE 
DESTINATION OF THE SERIAL INPUT MODULE. THE SECOND ‘64"' 
CHARACTERS ARE THE CHARACTERS THAT WERE ACTUALLY BUFFERED IN THE 
*“FIFO'' OF THE MODULE UNDER TEST. 


12.13. M73851, SERIAL 1/0 INTERFACE MODULE TEST 


THIS TEST IS INTENDED TO VERIFY THAT THE SERIAL 1/0 MODULE USED 
AS THE PDP-11 INTERFACE IS FUNCTIONING CORRECTLY. THIS IS DONE 
BY REMOVING THE M7380 CONTROL MODULE (THUS ELIMINATING ONE 
UNKNOWN) AND JUMPERING THE ‘T & R' BUSES (F1D1 TO Five) TOGETHER. 
THE MODULE MUST HAVE THE ‘D* JUMPER OUT AND THE ‘L* JUMPER 0 
THAT IT IS _ INITIALIZED ON POWER UP. 

ADDRESS THE DESTINATION PORTION OF THE MODULE. 

HAS BEEN RUN SUCESSFULLY, THE CONTROL MODULE CAN BE RE-INSERTED 
AND VERIFIED BY RUNNING THE M7380A TEST (12.1).D 


12.14. M7385T, SERIAL I/O TTL TEST 


SEQ 0016 
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THIS TEST VERIFIES THAT THE TTL I/O SECTION OF THE SERIAL 1/0 
MODULE IS FUNCTIONING CORRECTLY. IT REQUIRES THAT A TELEPRIN-ER 
BE CABLED TO THE MATIN LOCK OF THE SERIAL I/0. THIS COULD BE THE 
CONSOLE PRINTER ONCE THE TEST IS _ SELECTED. 


SHOULD BE HAL 
AND THEN RE~STARTED AT THE ‘TTLTST'* 
ALL CHARACTERS THEN TRANSMITTED WILL BE RECEIVED BY THE 
CE WRAPPED AROUND (BY THE CONTROL MODULE OR 
TO THE DESTINATION. _ HERE THE 
ILL BE TRANSMITTED BACK TO THE TELEPRINTER AND 
EFFECTIVELY AS FOR AS THE USER IS CONCERNED, THIS’ TEST 

ACTS LIKE A KEYBOARD ECHO TESTI. 


12.15. M7386A, KEYBOARD/DISPLAY MODULE ADDRESS TEST 


IN ORDER TO RUN THIS TEST, THE ‘W1'' JUMPER MUST BE OUT. _ THE 
FIRST SUBTEST ADDRESSES THE KEYBOARD AND CHECKS FOR THE FORCED 
RETURN OF THE *EOQT’’. 


THE SECOND SUBTEST RUNS IN A CONTINUOUS LOOP ADDRESSING BOTH THE 
KEYBOARD & DISPLAY. WHEN THE USER STRIKES ‘KEY REQUEST’', THE 
KEYBOARD BECOMES BUS MASTER. ALL DATA THEN TRANSMITTED FROM_ THE 
KEYBOARD IS SENT TO THE DISPLAY (IF AVAILABLE). THIS DATA IS 
ALSO RECEIVED BY THE PDP-11 AND PRINTED. 


IF "EOT’’ IS STRUCK, THE KEYBOARD RELEASES THE BUS AND THE PROGRAM 
IS AGAIN LOOPED UNTIL THE NEXT ‘KEY REQUEST'’. 


IF *‘STX’’ IS STRUCK AND THE SERIAL INPUT OPTION IS BEING USED, THE 
MESSAGE ‘RE-INITIALIZE THE PDM70"' IS PRINTED. THE PROGRAM THEN 
ENTERS THE ‘WAIT MODE’’ AND UPON RECEIVING A ‘‘CR'', WILL BEGIN 
RE-CYCLING THE SUBTEST. 


IF 'ETX’’ IS STRUCK, THIS SUBTEST IS EXITED, AND THE NEXT SUBTEST 
IS __ENTERED. UPON ENTERING THE NEXT SUBTEST, THE MESSAGE 
"ENTERING THE DISPLAY TEST, RE~INITIALIZE THE PDM70"' IS PRINTED. 
THE PROGRAM THEN ENTERS THE ‘WAIT MODE’’ AND WAITS FOR ‘'CR'’. UPON 
RECEIPT OF THE ‘‘CR’’ THE SUBTEST STARTS DISPLAYING THE ENTIRE 
CHARACTER SET, ON CHARACTER AT A TIME ACROSS THE ENTIRE SCREEN. 
AFTER EACH CHARACTER IS DISPLAYED, A SOFTWARE DELAY IS EXECUTED. 
THIS DELAY ENABLES THE USER TO VIEW THE LINE WBEFORE THE NEXT 
CHARACTER LINE IS DISPLAYED. AFTER THE ENTIRE CHARACTER SET HAS 
BEEN DISPLAYED, THE TEST ENTIRE TEST PROGRAM IS RESTARTED. 


12.16. M7387A, PROM HARDWARE READ-IN MODULE 


THIS PROGRAM MAY BE SELECTED AS _A SEPERATE MODULE TEST, ALTHOUGH 
IT IS RUN AS PART OF THE M7380 CONTROL MODULE TEST. REFER TO 


* REFERENCE THE LISTING FOR THE ADDRESS OF THIS ‘TAG’. 


E 


2 


_ SEQ 0017 





aM 


PART 1 OF SECTION 12.1 FOR A COMPLETE TEST DESCRIPTION. 


12.17. M7388A, CHARACTER 1/0 MODULE ADDRESS (IN-HOUSE) TEST 


THIS TEST REQUIRES A SPECIAL WRAP-AROUND MODULE (AVAILABLE ONLY 
IN HOUSE) TO RUN THIS TEST. FOR FIELD TESTING THIS MODULE REFER 
TO THE M7388F (SECTION 12.18). 


THE TEST USES THE SAME TEST PROGRAM AS THE SERIAL 1/0 MODULE 
(REFER TO SECTION 12.12). TO RUN THIS TEST, JUMPERS ‘SO & SI' 
MUST BE IN AND THE 'D' & ‘L* JUMPERS MUST BE OUT. 


12.18 M7388F, CHARACTER I/0 MODULE ADDRESS (FIELD) TEST. 


THIS PROGRAM IS DESIGNED TO COMMUNICATE WITH THE FIELD SERVICE 
TESTER. THE FIRST SUBTEST ADDRESS THE MODULE IN MODE ‘O° AND 
CHECKS FOR THE FORCED ‘FOT’. THE NEXT SUBTEST ADDRESS THE MODULE 
IN MODE ‘1° AND CHECKS THAT NO 'EOT" IS RETURNED. A REQUEST IS 
THEN MADE FOR THE USER TO INPUT DATA (VIA_ THE TESTER) TO _ THE 
MODULE. AS EACH CHARACTER IS RECEIVED, IT IS ECHOED TO PRINTER. 
THE PROGRAM WILL HANG IN THIS SUBTEST UNTIL ‘EOT* IS _ RECIEVED, 
ENABLING IT TO ENTER THE NEXT SUBTEST. THE NEXT SUBTEST IS A 
"FIFO' STORAGE TEST. IT REQUESTS FOR THE USER TO INPUT DATA (UP 
TO 63 CHARACTERS) AND AN '‘EOT’. AFTER ALL THE DATA HAS BEEN 
TRANSMITTED, TYPE "CR*. THE MODULE (SOURCE) IS THEN ADDRESSED IN 
MODE ‘O° ENABLING THE ‘FIFO* DATA TO BE READ AND PRINTED. 


THE NEXT SUBTEST LOADS ‘'16'', *4'’ CHARACTER DATA PATTERNS (A _ TOTAL 
OF 64 CHAR.*S) INTO THE DESTINATION ‘FIFO"*. THE USER IS THEN 
REQUESTED TO STROKE OUT THESE ‘64°’ CHARACTERS AND VERIFY THEM. 
THE ‘'4'' CHARACTERS PATTERN IS: ALL _1°S, ALLO’S, ALTERNATE *1'S & 
0'S'* AND REVERSED ALTERNATE ‘l'S & 0'S"’. 


THE LAST SUBTEST ADDRESSES THE MODULE USING ALL THE WRONG MODULE 


ADDRESSES AND CHECKS THAT THE SOURCE ISN'T ENABLED. THIS SUBTEST 
IS NOT EXECUTED WHEN USING THE SERIAL INPUT OPTION. 


12.19 ™M7377A, REMOTE SERIAL 1/0 TEST 


THIS PROGRAM TESTS THE M7377 MODULE USING THE PDP-11 VIA_ THE 
DL-11 AS THE DESTINATION INPUT AND SOURCE OUTPUT. 


THE FIRST SUBTEST ADDRESSES THE SOURCE PORTION OF THE MODULE AND 
CHECKS FOR FORCED RETURN OF EOT. 


THE SECOND SUBTEST TRANSMITS A RANDOM BUFFER AND CHECKS THAT IT 
IS RETURNED CORRECTLY. 


IN THE NEXT SUBTEST A 2ND RANDOM BUFFER IS TRANSMITTED AND THE 
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VARIABLE TERMINATOR OPTION IS CHECKED. 


NEXT, THE SOURCE IS THEN ADDRESSED ay THE WRONG MODULE 
ADDRESSES AND CHECKED TO MAKE SURE IT DOESN'T BECOME ENABLED. 


ETX AND STX ARE THEN USED TO VERIFY THAT ETX WILL CLEAR THE 
SOURCE AND STX WILL CLEAR THE DESTINATION. 


4 =. INTERVENTION SUBTEST THEN REQUESTS THAT THE OPERATOR 
RESET THE MODULE ADDRESS TO '17". DATA IS TRANSMITTED AND THE 
RECEIVED DATA IS VERIFIED. 


THE LAST SUBTEST CHECKS THE TIMEOUT AND REMOTE TIMEOUT ABILITY OF 
THE MODULE. A NON-EXISTENT SOURCE IS ADDRESSED AND THE MODULE IS 
CHECKED TO SEE IF IT WILL TIME-OUT CORRECTLY. 


THE TEST FOR THE M7377A MODULE WILL NOT RUN UNLESS THE OUTPUT 
OF THE M7377A (PDM70-JR) IS JUMPERED BACK TO THE INPUT 

(PIN 2 TO 3 + PIN 5 TO 7 ON THE MATE'N'LOCK) , AND THE TRANS- 
MITTER AND RECEIVER CURRENT LOOP INTERFACES ARE SET UP 

(WITH SWITCHES) TO ONE BEING ACTIVE, AND THE OTHER PASSIVE. 
ALSO, JUMPER WS ON THE M7377A HAS TO BE REMOVED, TO ALLOW 
“EOT’’ TO BE TRANSMITTED TO THE RECEIVER. 


12.20 ™M7378A, FOUNDATION MODULE TEST 


THIS TEST SETS THE SERIAL I/0 UP AS A SOURCE AND THE FOUNDATION 
MODULE AS A DESTINATION. A RANDOM BUFFER IS TRANSMITTED TO THE 
FOUNDATION MODULE VIA THE SERIAL I/0. THEN THE FOUNDATION MODULE 
IS ADDRESSED AS THE SOURCE AND THE SERIAL 1/0 IS ADDRESSED AS La 5 
DESTINATION. THE DATA SHOULD BE RETURNED VIA THE ‘WRAP-AROUN 
CABLE FROM THE FOUNDATION MODULE TO THE SERIAL 1/0. 


THE NEXT SUBTESTS VERIFY THAT ADDRESS ‘17° WILL RETURN DATA 
CORRECTLY, THAT THE WRONG ADDRESSES WILL NOT RETURN DATA, AND 
THAT THE CUSTOMER DEFINED MODE FLIP FLOP WORKS CORRECTLY. 


13.0 USER AID ROUTINES 


13.1. SUBX 


THIS ROUTINE ENABLES THE USER TO RUN ANY SELECTED MODULE ADDRESS 
SUBTEST WITHOUT RUNNING THE ENTIRE PROGRAM. WHEN ‘SUBX' IS 
SELECTED IT ASKS FOR THE "MEMORY ADDRESS* OF THE SUBTEST TO BE 
EXECUTED. THIS IS TO BE _ THE ADDRESS OF THE *SCOPE* ARGUMENT 
BEGINNING THAT SUBTEST. IF A ‘SUBX' ADDRESS HAD PREVIOUSLY BEEN 
SET UP, THE USER CAN SIMPLY TYPE ‘CR* AND THE PREVIOUSLY SELECTED 
TEST WILL BE RE-ENTERED. 


SEQ 0019 
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13.2. RECBUF 
THIS ROUTINE ENABLES THE USER TO EXAMINE THE CONTENTS OF 


DL11°S RECEIVER BUFFER. WHEN SELECTED, THIS ROUTINE PRINTS se 


CONTENTS OF THE BUFFER IN THE ORDER IT WAS RECEIVED. IF 


BUFFER IS EMPTY, A MESSAGE IS TYPED TO THAT EFFECT. 


THE 


SEQ 0020 
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IT SHOULD BE NOTED THAT ALL DATA RECEIVED FROM THE PDM70 IS 
STORED IN THIS BUFFER. 


13.3. TRNBUF 


THIS ROUTINE _— THE USER TO EXAMINE THE DATA TRANSMITTED VIA 
THE DL11 TO THE PDM70. THE ‘RECBUF* & ‘TRNBUF* ROUTINES ARE 
ESPECIALLY rite IN TRACKING DOWN A DATA FAILURE. BY COMPARING 
THE TWO BUFFERS, THE USER CAN SEE EXACTLY WHERE THE FAILURE 
OCCURRED AND PICK OUT ANY DESIRED DATA PATTERNS. 


13.4. SEND 


THIS ROUTINE ENABLES THE USER TO SEND HIS OWN PROGRAM TO_ THE 
PMD70. WHEN ‘SEND' IS SELECTED AN ASTERISK IS at tee * TO 
INDICATE THAT THE ROUTINE IS READY TO ACCEPT INPUT. EACH 
CHARACTER IS RECEIVED IT IS ECHOED BACK TO THE TELEPRINTER AND 
TRANSMITTED TO THE PDM70. 


THIS ROUTINE IS RUN WITH THE DL11 RECEIVER ENABLED. THIS MEANS 
THAT THE USER CAN USE THE ‘RECBUF* ROUTINE TO EXAMINE FOR ANY 
DATA RETURNED BY HIS PROGRAM. 


13.5. RUN 


THIS ROUTINE IS USED IN CONJUNCTION WITH THE SEND ROUTINE. WHEN 
"RUN* IS SELECTED, IT WILL RE-TRANSMIT THE USER'S ‘SEND* PROGRAM. 
IF THE SERIAL INPUT OPTION IS BEING USED, THE "SEND' PROGRAM IS 
TRANSMITTED AND THEN THE PROGRAM ENTERS THE ‘WAIT’ MODE. IF THE 
SERIAL INPUT OPTION IS NOT BEING USED, THE SEND PROGRAM IS 
CONTINUOUSLY TRANSMITTED. IN THIS CASE, THE CONSOLE SWITCHES CAN 
INCORPORATE A_ DELAY TIME BEFORE THE PROGRAM IS 
NO PROGRAM DELAY IS _ ISSUED WITH ALL DATA 
ALL DATA SWITCHES UP (EXCEPT 11 & 12)* REPRESENT 
MUM PROGRAM DELAY. THE USERS SEND PROGRAM CAN BE EXAMINED 

AT ANYTIME BY USING THE *TRNBUF' ROUTINE. 


*CONTROL C* WHICH IS NORMALLY — TO RETURN TO THE MONITOR IS 
ECHOED AND TRANSMITTED AS *ETX'. SO IN THE SEND ROUTINE, 
"CONTROL E* IS USED TO ESCAPE AND RETURN TO THE MONITOR. 


* REFER TO CONSOLE SWITCH SETTINGS (SECTION 6.) FOR SPECIFIC SWITCH 


FUNCTIONS. 
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19=JAN=78 14:50 SEQ 0022 
. TITLE CZPMACO PDM70 DIAGNOSTIC TEST 
ABLE ABS 


-ENABLE AMA 
:AC-9017C=M 


MC 
COPYRIGHT 1974,1978 
REVISED: SEPTEMBER 20,1974 ,FEBRUARY 1,1978 
DIGITAL EQUIPMENT CORP. MAYNARD MASS. 01754 
;PROGRAMMER: EARL L. BOUSE 
: MIKE MITCHELL 
: BILL SCHLITZKUS 


;SWITCH REGISTER DEFINITIONS AND FUNCTIONS: 


S$W15=100000 :=1, CONTINUE ON ERROR 

LOOP ON CURRENT TEST 
SUPPRESS ERROR TYPEOUT 
SINGLE STEP DL11 OUTPUT DATA. 
TRANSMIT SAME CHARACTER. 
INHIBIT MANUAL INTERVENTION 
INHIBIT TRANSMITTER DELAY 


. 


Be Be Be Be Be Be 
uu i 


—_ — = =) = 


.s *. &* & & 


; INSTRUCTIONS DEFINITIONS 


PUSH1SP=5745 
POP1SP=5726 
PUSH2SP=24646 
POP2SP=22626 
NOP=240 
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.SBITL **xxxeee NOTES setewenne 
NOTES: 


;PDM-70 MUST BE CLEARED BEFORE RUNNING ANY TEST. 


3ON POWERUP, THE FIFO IS GENERALLY CLEARED (UNLESS ‘N'' MODULE IS PRESENT). 
71F, DURING THE COURSE OF RUNNING THIS DIAGNOSTIC, IT BECOMES 

zNECCESSARY TO RESTART A SUBTEST (FOR EXAMPLE, AFTER ENCOUNTERING AN ERROR), 
THE PDM70 FIFI SHOULD BE CLEARED OUT TO INSURE THAT GARBAGE WILL 

NOT ACCIDENTLY BE LEFT IN THE FIFO WHICH WOULD SUBSEQUENTLY 

;GIVE AN ERRONOUS DATA ERROR. 


;MODULE SETUP: 


DR III RR RRR ERR ERE KEK KER RRR RRR ER 


; MODULE UNDER TEST *M7379(CLOCK) * M7379 (CLOCK) * 


PRR RR kD Sik kk Dhaka he hehehehehe hahahahahahaha lelehelelelelelalslelolelslalehelalelaleleiele! 


: *M973 (CABLE) * M598 (COUPLER) * 


REECE EKKEKKKKEEKEKEKKEKKEKKEK 


SYSTEM TEST SETUP (USING SERIAL 1/0) 


J RRR RRR EEE ERE EEE REE KEE RRR KEE EERE EEE 


;MODULE UNDER TEST * M7379 (CLOCK) * M7379 * 


SORIA OIOIIOIOIOIOIIOIOIOIOIOIO RIOT ITI III TOTO TTT IA IIA SASS AS SS. 
: *M7380 (CONTROL MODULE) * 
: FOI III IIOIOIUIOIUIOIOIUIOIUIUIIOIOI I tok 
ISOC IOIOIOIIOI IK foto 


: SERIAL I/0 CABLE * 


[RRR AEE EERE KKK 


NOTE: JUMPER ‘'L'' SHOULD BE IN TO ALLOW POWER UP TO ACCESS THE CONTROL MODULE. 
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LOAD TRAP ADDRESSES '0-1000' WITH THE ‘JOT’ TRAP 
000000 =0 
000200 «REPT 


-ENDR 
ERROR TRAP REPORTER ROUTINE. 
;POWER FAIL HANDLER 


;EMT TRAP, EMT DISPATCH SERVICE 
;TELEPRINTER KEYBOARD ROUTINE 


SWSWR: 0 sl :SOFTWARE SWITCH REGISTER 
001376 jmp MONITR :PROGRAM KEYBOARD MONITOR ROUTINE. 
.SBTTL EMT TRAP EQUIVALENCE TABLE 


PRCNTR=EMT ; SUBROUTINE TO PRINT CONTROL CHARACTER IN R1 
;LOGIC TEST SCOPE SUBROUTINE 
; SUBROUTINE TO SAVE 'RO-R5" ON STACK 
GET "RO-R5' FROM STACK 
WAIT FOR DL11 RECVR. 
SET UP THE DL11 O'S RECEIVER. 
TRANSMIT A SINGLE CHAR. VIA DL '0" 
; TRANSMIT THE DATA IN CALL +2 VIA DL ‘0° 
TYPE IT=EMT+10 ; PRINT yy IN ‘R1' 
RANDOM=EMT +11 ; CREATE A RANDOM DATA BUFFER. 
PRINT=EMT+12 ; O PRINT ASCII MESSAGES. 
TTYIN=EMT+13 ;$ INPUT VIA KEYBOARD 
PRTOCT=EMT+14 ; PRINT A 6 DIGIT OCTAL NO. 
ASEMBL=EMT+15 ; ASSEMLE CHARACTERS INTO OCTAL VALUE 
SPACE=EMT +16 :$ PRINT SPACES 
TSTTKS=EMT +17 : TEST FOR KEYBOARD FLAGS 
DELAYL=EMT +20 ; SETUP A_LONG DISPLAY DELAY 
NUL TRANSMIT A tence CHAR. 


REPORT MODUL S 
TRANSMIT 12 NULL CHAR.'S. 
SETUP DESTINATION MODULE. 
SETUP A SOURCE MODULE 
REQUEST & SAVE MODULE ADDRESS 
TORE A/D CONVERSIONS 
TO BINARY 


NNN — SS SS Os es es 
NVSSBNRARWNASS 


1 
1 
1 
4 
; 
1 
1 
1 
1 
1 
1 
1 
1 


and ad ond 
Mronwr 
MEW 


Ys Ss Ss Ss Ss os Ss PS HO 
BetncKneseyEye 


SETUP THE *“R* RESTART ADDR. 
; INHIBIT TRANSMITTER DELAY 
PRTRBF =EMT +37 ; SUBROUT INE PRINT CONTENTS OF RECVR BUFFER 
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IAA OIRO SIOISISIOIOIOIOIIOIOIOIEIIOIOITIOIOI III TOTO TT TTT TTI SAASISIISS SSSISSSISSS AS 
‘SBTTL EMT DISPATCH SERVICE ROUTINE 

ARGUMENT OF EMT IS EXTRACTED AND USED AS OFFSET TO OBTAIN POINTER 

3TO THE SELECTED SUBROUTINE. 


TG I IR RR IOICICICR I OICICICIOIO IIE TOTTI TOT TTT TTT TTT TTT TI III IISIAISSIISASSIS IAI ASS SASS 


EMTSRV: MOV (SP) ,~(SP) ;GET PC FOR TO RETURN 
S #2, (SP) PC OF EMT 
a(SP), (SP) GET EMT 
(SP) :1S EMT VALID? 


EMTOK 
INVALID EMT 

(SP) SMULTIPLY EMT ARG Hl i 

#177001, (SP) ; CLEAR UNWANTED BITS 

MEMTTAB, (SP) [POINTER TO SUBROUTINE ADDRESS 

a(SP), (SP) ; SUBROUTINE ADDRESS 

JMP a(SP)+ :GO TO SUBROUTINE 

EMT DISPATCH TABLE 


EMTTAB: XPRCNT ; SUBROUTINE TO PRINT CONTROL CHAR. IN R1. 
XSCOPE [MODULE TEST SCOPE LOOP ROUTINE 
; TINE TO SAVE ‘R1-R5° ON hn 
TO RETRIEVE RI-RS! + FROM TACK 
WAIT FOR DATA From DLIi RECEIVER 


INGLE CHAR 

TRANSMIT DATA FROM ADDRESS IN CALL#2. 
PRINT CHARACTER IN ‘R1' 
CREATE A RANDOM DATA BUFFER. 
PRINT ASCII MESSAGES. 
INPUT VAI KEYBOARD. 
PRINT A _*6" DIGIT OCTAL NO. 

ONE WORD NO. 


CHAR. 'S 

SET UP r DESTINATION MODULE 
SET UP A SOURCE MODULE 
REQUES! & SAVE MODULE ADDRESS 
TAKE & STORE A/D CONVERSIONS 

TO CONVERT ‘BCD’ TO BINARY 

TO AVERAGE 'N* NUMBERS 

TO REQUEST & STORE A/D CHANNEL. 

TO CONVERT BINARY TO DECIMALS. 


— os ss ee = = es = ot SS es 
SSBLRARATASBaVaa 


3 B D DELAY 
022246 ;SUBROUTINE TO PRINT CONTENTS OF RECVR. BUFFER 
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-SBTTL REGISTER ADDRESSES 


177776 : 177776 ;ADDRESS OF PROCESSOR STATUS REG. 
: {ADDRESS OF KEYBOARD STATUS REG. 


nts PRINTER STATUS REG. 
* PRINTER BUFFER REG. 
: RS. SWITCH REG. 
177571 a. WTRF es "* HIGH BYTE 


3;DL11 REGISTER ADDRESSES 


175610 : 175610 ADDRESS DL11 REC. CSR 
: DL11 REC. BUFFER 
TRANS. CSR 
: DL1i TRANS. BUFFER 
ADDRESS REC. VECTOR 


ADDRESS DL11 TRANS. VECTOR 
; ADDRESS 1'S DL11 TRANS. VECTOR 


-SBTTL DEFINITIONS OF THE ‘PDM-70' CONTROL CHARACTERS. 


DC1=021 ENABLE SOURCE 
: ENAGLE bE STINATION 


:DO NOT ate 
END OF TEXT 

sSTART OF TEXT 

: SYNCHRONIZE (DELAY) 
START HEADER 

; SHIFT 


IN 
:END OF TRANSMISSION 
ENQUIRY 


JR RIKER IIR ERR EERE REE EERE REE EERE KEE REE EER EER REE RE EK 


.SBTTL KEYBOARD MONITOR 


FIR III I RI RRR IR ERR RIKER RR ERR EERE EERE EERE 


001000 MONITR: MOV . SET UP STACK 
000340 MOV #340, -(SP) SET PROC. PRIORITY a7 
001414 MOV 1 ~(SP) 


001430 000004 1$: ;SETUP FOR TIMEOUT 
177724 :HARDWAPE SWITCH REGISTER? 


BR 3$ 
000176 001352 2$: MOV #SWSWR, SWR :NO-USE_ SOF tee SWITCH REG. 
000006 000004 3$: “14 #6, 4 SRESTORE TRAP CATCHER 


NUL 
032144 :CLR SOFTWARE Sw. 
032122 CLR SOFTWARE SW. 
032150 CLR SOFTWARE Sw. 
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254 005737 032120 TST MTRSWH ;PROGRAM BEEN INITIALIZED? 
255 1 BNE MONTR5 :YES 


256 005237 032120 MTRSWH :NO 
257 104012 
258 023353 ;PRINT PROGRAM HEADER 





on 
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000764 
012777 
012777 


032132 


000131 


002214 


032132 


001356 
000004 


000002 


001376 


016740 
000200 


001506 032124 MONTRS: MOV 


MACY11 


015330 


177500 
177474 
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KEYBOARD MONITOR SEQ 0028 


© He te Hee ie He Be I TT IH RTT IIIT TTI TT ITT TOTTI TEK ERK 


“MONITOR RESTART ADDRESS STARTS HERE 


SI II IIT RITTER IOI III IOI IOI IIIT IIA IAAI AASASSASSASSSSSSISSSISOSSSOS SION 


MONTR1: CLR SI1OSWH 
PRINT 


TEXT ‘IS INPUT VIA SERIAL 1/0? 
; NPUT 
#131, INBUF ; 
MONT1A =NO, SETUP DL11 INPUT 
ZREQUEST SERIAL 1/0 ADDRESS 


[SET UP ALL ADRESSES WHERE 
:SERIAL INTERFACE IS USED. 


RO, IADRSO 
RO, IADRS1 
RO, IADRS2 
RO, IADRS3 
RO, IADRS4 
RO, IADRS5 
RO, IADRS6 
RO, IADRS7 
RO, IADRS8& 
RO, IADRS9 
RO, IADR10 
SIOSWH :YES, SET Sw. 

REQUEST DL11 ADDRESS & VECTOR 
sWAIT AND DECODE 

RO WAS AN ADDRESS ENTERED? 

3;NO, USE STANDARD ADDRESS. 
;SET UP TO LOAD ADDRESS 


MONTR3 
ARCSRO,R2 
#4 ,R3 

RO, (R2)+ 
a ADD ‘2° TO THE ADDRESS 


-10 
#XLVLO+2,R2 
MONTR3 


R4,RO 
MONTR2 
#RECVER,ARINTO 


;LOADED VECTOR ADDRESSES? 
EXIT 


7 YES, 


MONTR3: ;SET UP RECEIVER SERVICE ADDRESS 
:RINTO=DL-11 VECTOR (300) 


3BR LEVEL °4" 


PRINT TEST PROTOCOL 
7SET UP THE ‘RESTART* ADDR, POINTER 


PRINT DOT TO INDICATE READY 


MOV #200, @RLVLO 
MONTR4 : 


AMONTR1,RVECTR 





Om 
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001712 
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FR II TITIES OI IO IO IOS AA AIIASIASASISSISSISSSSSSIMSISASSISSIS SSS SSSUSSSN 


;THIS SUBROUTINE DECODCS THE USER'S INPUT AND EXECUTES THE SELECTED TEST 


DI IOI IORI IIIT IOI IO IOI III AAS AINSI SASSSIASSISISASSISSASAISSSSSSSSSSSS OS 


015330 DECODE: CLR INBUF 
TTYIN ;CALL KEYBOARD ROUTINE 

000103 015330 MP #103, INBUF sWAS ‘C’ TYPED TO CONTINUE LAST TEST? 
BN DECOD1 :NO, DECODE INPUT 

032224 YES, HAS A RESTART ADDR. BEEN SET UP? 

TCH NO, ILLEGAL ENTRY. 

023304 CHECK FOR SOFTWARE SWR 

030256 J STRT YES, RESTART LAST TEST 

023475 DECOD1: MTSTLST,R1 :SET UP MESSAGE ADDR. POINTER 
C R3 OFFSET REG. 

015330 RECYCL: #INBUF ,R2 SET UP TTY BUFFER POINTER 

000045 C #45,(R1) 


+10 
000040 #40, (R1) ; CHAR. = TO "SPACE" 
(R1)+ ‘YES, SKIP CHAR. 
RECYCL 
(R14, (R2)+ : COMPARE BUFFERS 
USH ‘NOT EQUAL, SET UP NEXT WORD 


=NO, COMPARE NEXT CHAR. 
:SET UP OFFSET 


002076 032224 TSTABL (R3) ,RESTRT ;SET UP A RESTART ADDRESS 


000054 


002076 032126 TSTABL (R3) ,AVECTR 
000004 032126 #4 ,AVECTR ;SET UP TO RE~ADDRESS MODULE 
023304 : PC, UPDAT1 ;CHECK FOR SOFTWARE SWR 
002076 J @TSTABL (R3) EXECUTE SELECTED TEST. 

t R ; INCREMENT OFFSET CNTR. 
000100 C hay OO TEST FOR ‘a’ 


NMATCH YES, END OF MESSAGE. 
000054 MPB #54,(R1)+ CHAR = COMMA? 

RECYCLE YES, COMPARE NEXT WORD. 

FLUSH+2 :NO, KEEP GOING. 


: PRINT 
QMARK ; ILLEGAL ENTRY, TYPE ‘?' 
BR DECODE ;GET NEW INPUT. 





c 
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ett tek kk kkk Re lk iaka ia lalala lake lalahalehehalelaialeleialelalaleielaleleieleleielelelelelcleisieieieisleisioiel 


; TABLE FOR TESTS SELEC’ABLE VIA KEYBOARD 


RII IIIT IOI III III IOI IORI IIIA IAA ASSAASISASIISIASASASSISSSSSISSSSSSSSOS SISOS 


TSTABL: M7380A 
M7381A 


;CONTROL MODULE TEST 
:BCD INPUT MODULE ADDRESS TEST 


;BCD INPUT/OUTPUT EXERCISER TEST 
;A/D MODULE ADDRESS TEST 

;A/D MODULE CALIBRATION TEST 
;A/D REPEATIBILITY TEST 


EST 
3;D/A OUTPUT MODULE EXERCISER TES 
;SERIAL INPUT/OUTPUT MODULE ADDRESS TEST 
SERIAL 1/0 INTERFACE TEST 
[SERIAL INPUT/OUTPUT TTL TEST 
Z;KEYBOARD/DISPLAY MODULE ADDRESS TEST 
HARDWARE READ-IN MODULE TEST 
CHARACTER I/0 (IN-HOUSE) MODULE ADDRESS TEST 
; CHARACTER I/0 pf os ADDRESS TEST 


ROUTINE TO PRINT CONTENTS OF DL RECV BUFFER 
;ROUTINE TO PRINT CONTENTS OF DL TRNS BUFFER 
;ROUTINE TO TRANSMIT CHAR.'S FROM TTY 
;ROUTINE TO LOAD & RUN THE SEND PROGRAM 


. SEQ 0030 


aon) 


5 gl + the Nard | He 2 
CZPMAC P11 4:50 


378 
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104012 


002236 


005301 
005237 


032222 
032144 


032132 


002213 
032222 


032222 


M7380A: PRINT 
MES1 


. 2 
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YBOARD MONITOR SEQ 0031 


SIAR IOIOISIOIOIOICIOIOIOIOI ICICI IOI INITIO I TOT ITT DITA AISA IAISAAIISISSISISS SSIS SSSA SISA. 
.SBTTL M7380 CONTROL MODULE TEST. 

THIS TEST COMPLETELY EXERCISES THE PDM-70 "CONTROL MODULE’ USING THE 

:PDP=11 AS THE MASTER ‘SOURCE/DESTINATION' MODULE. THE TEST TAKES THE 
=MODULE THRU THE INITIALIZATION, PROGRAM, ADDRESS AND DATA MODES RESPECTIVELY. 


RIOT IOI IOI IIA AAS SI SSSA SSIS ISIS IISA SISISISISSIISSISISISISISISIAIASISIIS SSIS SSCS SACS 


;TEXT ‘CONTROL MODULE TEST’ 


NOP 

CLR LOPSWH 

SETUP ;SET UP TEST PARAMETERS. 
CLR DLY SwWH ;ENABLE TRANSMITTER DELAYS 


FICO ROTOR IORI IORI IORI IAAI IAI IAISSIISASSISSASAASIISSISAIS IIIS AIS SSIS SS SAN. 
;LOAD '2" PROGRAMS INTO THE CONTROLS ‘FIFO" AND CHECK THAT 
;THE CONTROL MODULE ENTERS THE ADDRESS MODE. 


DR IOI TITS TOTO SOTTO TOTOTOTOTO SOIT IOI SORTS OI OI OI IOI SSAA IIS SSI IS SSNS SSIS SSE 


NOP 
NOP 
LDPGMO ;LOAD THE FOLLOWING PROGRAM. 
PRGM1~1 
TAGB 
BYTE STX 


PRGM1: .BYTE DC1 


IADRSO: .BYTE 75 


BYTE SOH 
-BYTE 61 
-BYTE DC2 ALERT DESTINATION 
IADRS1: .BYTE 75 
-BYTE DC3 
PRGM2: .BYTE ODC4 START OF 2ND PROGRAM 
-BYTE DCI 
IADRS2: .BYTE 75 
-BYTE SOH 
-BYTE 61 
-BYTE DC2 
IADRS3: .BYTE 75 
BYTE 61 
BYTE 63 
«BYTE DC3 
END2: -BYTE ETX 
«EVEN 
TAGB: TST SIOSWH SERIAL 1/0 INPUT? 
BNE TAGOB1 ;YES, JUST LOOK FOR DATA 
MOV #PRGM1 ,R1 NO, VERIFY 1ST PROGRAM 
TST LOPSWH sLOOPING FROM LAST TEST? 
BEQ +4 NO, DON'T LOOK FOR ‘STX* 
DEC R1 :YES, SET UP TO LOOK FOR 'STX' 


Ci 
Ca 
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122221 CMP 1: ~— ;COMPARE RECV'D/TRANSMITTED DATA 
.+ 
;RECV'D/TRANS ADDRESS DATA DIFFERENT 


BR CT2 sEXIT ON ERROR. 
002222 APRGM2 ,R1 ;CHK'D ALL DATA? 
CMP 1 =NO 


zAT THIS POINT THE MODULE SHOULD BE IN THE ‘DATA MODE' 
THIS NEXT SUBTEST SENDS THE CHAR. ‘A* AND CHECKS 
;THAT IT IS RETURNED AS DATA. 


TAGOB1 : _ 


SEND CHAR, ‘A’ 
oo WAS *A' RETURNED? 


YES 
MODULE DiDN*T ENTER DATA MODE 
031365 


FCRIII OIRO IORI OR IR IASI AIA AIA IS IIASIISIIIIASISIIASII SAI AISI IASI SSSI ISSA SSSA I 
STHE CONTROL MODULE SHOULD NOW BE IN THE "DATA MODE’. THE FOLLOWING 
:SUBTEST CREATES A RANDOM "500" WORD DATA BUFFER AND TRANSFERS IT TO THE 
;CONTROL MODULE. THIS DATA IS VERIFIED WHEN IT IS RECEIVED BACK FROM THE 
[CONTROL MODULE. 


TOTTI IIIT SORT TOI IIIT ITI OTIS IAS IIIS I IAAI SII IANS ISS SSS SSS 


000002 CT2: SCOPE ,2 sTEST 2 
RANDOM ; CREATE A RANDOM DATA BUFFER 
; TRANSMIT DATA FROM FOLLOWING ADDRESS. 


017670 ATRNBFO,R1 
wn” adaniaed ;REVC'D & TRANS DATA EQUAL? 
.+ L 


:YES 
;RECV'D DATA DOESN'T EQUAL TRANS DATA 


BR CT3 
016220 PARITY ;PARITY ERROR FLAG SET? 
CT3A ;NO, DATA GOOD 
[YES, PARITY ERROR ON LAST TRANSFER 


0004 B .+10 
022701 020372 2 ATRNEND ,R1 :CHK'D WHOLE BUFFER? 


CORRECTED 7/1/74. 
001362 CMP2 
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497 002444 122701 


507 002464 104022 
508 002466 031321 


14:50 


000003 


002222 
000004 


032132 


002234 


000101 
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SO ISIE III ISISIOIC ISIC ROTOR IOIOIOIOIOIOIOIOI III ITO TITRA AI ASISSASSS SSS SSSA. 
:THIS SUBTEST ISSUES AN 'EOT' CHARACTER AND CHECKS THAT THE CONTROL 
[MODULE RE-ENTERS THE ADDRESS MODE AND THAT THE SECOND PROGRAM LOADED IN 
;THE 1ST SUBTEST GETS READ OUT. 


Werrrrerretetrtritiitititiit iti t titi titiitititt iti titi tii iii 


CT3: SCOPE ,3 ;TEST 3 
LDCHRO 
EOT ; TRANSMIT THE ‘EOT' CHAR. 
MOV APRGM2 ,R1 
CMPB MEOT, (R2)+ :CHK THAT ‘EOT"® WAS RETURNED 
BEQ .+10 
MODERR 
ERRS sEOT CHAR WASN'T RETURNED 
BR CT4 sEXIT ON’ ERROR 
TST SIOSWH sSERIAL 1/0 INPUT? 
BNE TAGOA ‘YES, JUST VERIFY DATA 
CMP3: tony — (R1)+ ; COMPARE DATA OF THE SECOND PROGRAM 
MODERR ;ADDRESS ERROR IN 2ND PROGRAM 
ERR4 
BR CT4 
CMPB #END2,R1 ; DONE 
BNE CMP3 =NO 


;SEND A CHAR. TO VERIFY THE 2ND PROGRAM IS 
IN THE DATA MODE 


TAGOA: ue 


a —— ey: THE *A* RECV'D? 
C 
MODERR OND PROGRAM DIDN*T ENTER DATA MODE 


C2 
C2 
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PRR RERR ERE RR KEREREREKK PPRRRESSESSSASSSSES ESSE SESE SE EER RRR ARR RASA RR ARDS SS DS 


; ISSUE ANOTHER ‘EOT' TO TEST THAT THE ADDRESS MODE OF THE 1ST PROGRAM IS 
;RECIRCULATED BACK OUT OF THE ‘FIFO’. 


SIR RI IOI IOISIOIIOIICIOICIOICIOIOIIOI IOI III IOI III TI TTT TT AAAI ASIASISSSSSASISISSSSASA. 
000004 CT4: TEST 4 
;"EOT' SHOULD RE-ADDRESS 1ST PROGRAM 
;ADD ‘1° TO BUFFER POINTER 


032132 ;SERIAL 1/0 INPUT? 
. gYES, JUST CHECK DATA 
002213 


31ST PROGRAM DIDN'T RECIRCULATE 


cT5 
002222 A#PRGM2 ,R1 
CMP4 


;SEND A CHAR. TO VERIFY THAT THE 1ST PROGRAM ENTERED THE DATA MODE 
TAGOC: uo 
000101 CMPB #'A,(R2)+ ;WAS CHAR RETURNED? 


BEQ CTS :¥ 
MODERR ;17ST PROGRAM DIDN'T RE-ENTER DATA MODE 


ERR6 





CZ 
C2 
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SEQ 0035 


JAGR IORI ICICI III IOIOIOIOIOIE TUTOR UIC I IOI RIOT TTT AI IAAISASIS ASSIS SSS SASS SSSS ASS. 
[THIS SUBTEST ISSUES ANOTHER ‘EOT' CHARACTER. THIS SHOULD ENABLE THE 
TADDRESS OF THE 1ST PROGRAM TO BE OUTPUT SINCE THE SECOND PROGRAM 
CONTAINED A ‘'DC4* AND SHOULD HAVE BEEN FLUSHED. 


SOCIO ICICICICIOIIIOIOIOICIEIIEIIOI RIOTS TT TTT OT TT TT TT TTT TITAS ISIS IN SI ISSISSAAN 
sTEST 5 


;"EOT* SHOULD ENABLE ADDRESS MODE 
CHECK THAT “EOT* WAS RETURNED 


;"EOT' CHAR. WASN'T RETURNED 


EXIT ON ERROR 
SERIAL 1/0 INPUT? 


CTS: SCOPE ,5 
CHRO 


MEOT, (R2)+ 
.+10 


(R1)+, (R2)+ 
.+10 


C16 
#PRGM2 ,R1 
CMP5 


#'A,(R2)+ 
-+6 


CHECK RECV'D ADDR. AGAINST PROGRAM 1. 
;PROGRAM DIDN'T RECIRCULATE PROPERLY 





CZ) 
C2 
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000006 
017670 
00000 


017670 
032132 


000010 


017767 
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017767 
017770 


M7380 CONTROL MODULE TEST 


SIGIR III IIIT TTT TTT TTA ADIT I SAIS IIS SISISI SSSA SSSSAS 
[THIS TEST CHECKS THAT ALL '64' LOCATIONS OF THE CONTROLS 'FIFO' CAN 

TBE ACCESSED. THIS IS DONE BY LOADING ONE '64' CHARACTER PROGRAM IN 

;THE ‘FIFO’. IN THIS PROGRAM , "56" CHARACTERS ARE RANDOM LITERAL 
[CHARACTERS ENTERED UNDER AN 'SI' COMMAND. 


III IOI III IOI III IIIT OR TORI IO IO IIASA AS ASSIS SSIS SISSISSISSSSSSSISSISSSSSSSSSOSSO 


CT6: : ; TEST 6 
RANDOM ; CREATE A RANDOM DATA BUFFER 
ATRNBFO,RO ;SET UP TO LOAD AN ADDRESS ON THE DATA 
MSTX, (RO) + ;ENTER ADDRESS MODE 
#DC1, (RO)+ TALERT SOURCE IF SERIAL I/O IS OUT THERE. 
IADRSO, (RO) + sADDRESS INPUTTED VIA USER 
e :MODE "1°; WAIT FOR DATA 


:ALERT DESTINATION FOR SERIAL I/0 
IADRSO, (RO)+ | ADDRESS INPUTTED VIA USER 
#SI,(RO)+ ‘SEND '55* LITERAL CHARACTERS 
#DC3,TRNBFO+77 :LOAD THE '64° CHAR. 
#ETX.TRNBFO+100 : TERMINATE THE PROGRAM 


SEND THE PROGRAM 


;WAIT FOR DATA TO RETURN 
WAS ANY DATA RETURNED? 


:YES 
;CONTROL MODULE DIDN'T RETURN ANY DATA 


EXIT ON ERROR 

SET UP TO VERIFY DATA 

[USING SERIAL 1/0? 

:NO. VERIFY ADDRESS AS WELL AS DATA 
:YES, MOVE POINTER TO VERIFY DATA ONLY 


#10,R1 
(R1)+,(R2)+ 
10 


;DATA ERROR 
CT7 EXIT ON ERROR 
#TRNBFO+77,R1 ;DONE? 
CMP6 


SEQ 0036 
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PARRA RRR ERE, RRR RARER EKER EEE 


TAT THIS POINT THE PROGRAM, ADDRESS AND DATA MODES HAVE BEEN TESTED. 
THIS SUBTEST ISSUES ANOTHER 'STX" CHARACTER TO GET THE CONTROL MODULE 
SBACK INTO THE PROGRAM MODE. 


pvverrrercrrrtitirt et ti titt tit titiititititittititiit iti iii 


CT7: SCOPE ,7 sTEST 7 
LDCHRO 
TX ISSUE "STX' TO RE-ENTER PROGRAM MODE 


MSTX,(R2)+ 
.+6 


;THE 'STX" CHARACTER WASN'T RETURNED 


JARI IIIS SOIC IOI IORI TIIOIOICIOIOI TOIT TOIT TOT ATA AIA IAISAISISSSSSSS SSIS SIN. 
[THIS SUBTESTS TESTS THE DELAY TIMES OF THE ‘SYN’ CHARACTER. ALL THE 
[DELAY TIMES OF '1-9" ARE TESTED IN ORDER. THE TEST MAKES '2' CHECKS 
ON EACH TIME. FIRST IS THAT THE DELAY ISN'T TOO SHORT AND SECOND THAT 
;THE DELAY ISN'T TOO LONG. THIS TEST IS PREFORMED BY LOADING 

;'9" SEPARATE PROGRAMS AND STORING THEM IN THE CONTROL FIFO. 


TAA OIE A OISIISIIEIEISIOIOISI OO IICICITIUICIOIIOI IIIT ICI IT TI II TTT TE 


CT10: SCOPE,10 TEST 10 
; INHIBIT TRANSMITTER DELAY 
SET UP DELAY TIMES (1-9). 
SHORT TIME DELAY COUNT. 
#61 ,R3 ;START DELAY WITH ‘1°. 


ENABLE THE DL11 RECVR 
-(SP)  ;ENABLE INTERRUPTS 
-(SP) 
;CONTAINS THE ACTUAL DELAYS COUNTED 
R3,SYNTIM SET UP DELAY TIME FOR THIS LOOP 
R3,ERR9+16 ;PRINT DELAY TIME ON ERROR 
031023 R3,ERR10+16 
;LOAD THE FOLLOWING PROGRAM 
:GO HERE WHEN LOADED 


IADRS4: . :MODIF JED BY USER 
E ‘O' AUTO ‘EOT' 


IADRSS: . ? ;MODIFIED BY USER 
TENABLE DESTINATION 
SYNTIM: 6 ;LOCATION MODIFIED ON EACH PASS. 


IADRS6: :MODIFIED BY USER 
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ETX 


31 SEC. TTY DELAY. 
ZINCREMENT DELAY COUNTER 
WAITED LONG ENOUGH? 

YES, ‘EOT* SHOULD BE BACK. 
ZCHECK FOR FAST RETURN? 
NO, EXECUTE NEXT DELAY 
;BACK? 


3NO, STILL OK 

>'SYN* DELAY TOO SHORT 
z** CHECK ‘W2' JUMPER IN? 

TAGI +2 SEXIT ON ERROR 


: :GIVE IT AN EXTRA SEC. 
016224 TST RECEOT SHOULD BE BACK HERE. 
TAGH sHOORAY IT IS. 
;"SYN' DELAY TOO LONG 
z** CHECK ‘W2' JUMPER IN? 





016224 


TAGI +2 





R1 
#12,R1 TEST ALL_TIMES? 


TAGI +2 ava ee EXIT 

R2 SET UP TO TEST NEXT TIME 

R3 ise UP NEW ‘SYN’ COUNT 
;ENABLE NEXT 


PROGRAM 
TAGI: TAGD [LOAD THE NEW TIME DELAY PROGRAM 
000340 MO #340, -(SP) 
003236 #1$, -(SP) 


002000 176106 1$: #SW10,aSWR 31S "Swi0" § 
CT12 :NO, INHIBIT. TESTING M7387 
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RA IOI ICI ICR ICICI IOI IOI ICIS TORII IOI IOI TOIT IAI AISA AS ISIS SAIS ISAS SSS SASS IIE 
.SBTTL M7387 READ-IN MODULE TEST 

;THIS TEST IS RUN IN CONJUNCTION WITH THE M7380 CONTROL TEST. IT 

;REQUESTS THE USER TO INSET THE M7387 READER MODULE AND THEN 

SHIT THE RESET BUTTON. THIS WILL ENABLE THE PROM DIAGNOSTIC PROGRAM TO 
* a OUT. THIS PROGRAM IS THEN VERIFIED AND THE MESSAGE ‘PROM OK’ 


TEESE REACTOR RISO IOICIOICI IOUT IIT TT TTT TI TT TTI III III IOT 
CT11:  SCOPE,11 TEST 11 
BR +4 
M7387A: 4 ENTERED HERE IS M7387A IS TYPED 
TEXT ‘INSERT M7387 MODULE”. 


;ENABLE DL11 
ENABLE INTERRUPTS 


YJIANIYAYAAIA 
OBNAARWW—O 


NNWNWG 


zNO, WAIT 

;WAIT FOR DATA 
000340 MO -(SP)  ; INHIBIT INTERRUPTS 
003316 #2$ - (SP) 


003360 #PROMS ,R1 
MPB (R1)+,(R2)+ DATA OK? 


+10 YES 
;PROM DATA ERROR 
cT12 ;EXIT ON ERROR 


#PROMD ,R1 CHECKED ALL DATA? 
CMP11 ;NO 


ap 


tYES 
“TEXT "PROM OK" 
“WAIT FOR 'CR' TO CONTINUE. 


gk a et tt ot BD SV SO 


000001 032222 #1 ,LOPSWH 
BR CT12 


sFOLLOWING IS THE DATA WHICH SHOULD BE READ FROM PROM 
PROMS: .BYTE 
TE 


bd nt od 
NOWNYINW 


RIUNVEKGERE 
NOUNNSS 


722 
723 
724 
725 
726 
727 
728 
729 
730 
731 
732 
733 
734 
735 
736 
737 
738 
739 
740 
741 
742 
743 
Foote 
745 
746 
747 
748 
749 
750 
751 
752 
753 
754 


— 
Nm 
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104001 000012 


104012 
024236 
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000137 002172 
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READ-IN MODULE TEST 


SNR Rt Be Dalek Rela he hehehehe lalate heheta hehehehe haheheheheleieleleiehelelelaleleleleiehehaleleleleleleleheiaialaleleleidicleicielelolelel 


TEST COMPLETE 


MRR RRR Nala ha hehehe leletalala hahaha hetetalalehahehehehelelehelelehehelelelelelelsheleleleleleleieleleieieleieieleleleieleleleieieielel 


CTi2: 


zsTEST 12 


TEXT "TEST COMPLETE’ 
[SET Sw. TO LOOP PROGRAM 
[RESTART PROGRAM 


SCOPE ,12 
PRINT 
ME S7 


INC 
JMP 


LOPSWH 
M7380A+12 
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030526 


023274 


000060 
017220 
016224 


032134 


009077 


016246 
000004 
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017231 


M7387 READ=-IN MODULE TEST 
FARO IIIT I IIIT TTT TRAIT SA IIIS SAIAIASISISISASISISSSSASSSSIASSSSS SASSI SSA. 


.SBTTL M7381 BCD INPUT MODULE ADDRESS TEST 


FI III ITI TIO IOI IO TOTTI TOO IOI ISO IISA ISS SAISSASISSSSSSSIISSISSSSSSSSSNSST SE 


M7381A: PRINT 
MES29 


A GET MODULE ADDRESS 
BCDTO: INT TEST "SET SW'S ALL ON 


UPDATE ;CHECK FOR SOFTWARE SWR 
;SETUP TEST PARAMETERS 


FI II III III ITI IOI TOIT SOTO IO III IASI A IAI IIA IASI IASI NSIS SANS SISISSSISISSSSSISISSSS SSO 


[THIS SUBTEST ADDRESSES THE MODULE IN MODE 'O' AND CHECKS THAT THE 
[MODULE ADDRESS, MODE AND CORRECT NUMBER OF DIGITS ARE RETURNED. 


SPIRO IIIT IOI III TOI I IO IT OST IOI IOI I III I II ISAS ISI ISIIISISISISISISISISISISAISISSISSSISSSSISSS SNC 
BCDT1: 
#60,S0H1 ;SET UP MODE ‘O' 
PC, @¥ADRSRC ;ADDRESS THE MODULE 
RECEOT ;WAS ‘EOT' RETURNED? 
.+10 7 YES, VERIFY DATA 
zNO, MODULE DIDN'T ENTER DATA MODE. 
BCDT2 
ner RECEIVE CORRECT ADDRESS? 
.+ 


;YES 
[RECEIVED WRONG MODULE ADDRESS 


BCDT2 
at apeant Yala CORRECT MODE? 
.+ 
;MODULE WAS ADDRESSED IN MODE '0' 


BCDT2 
wh aos ;SHOULD READ ALL 1°S WITH INPUTS OPEN 
.+ 


DATA ERROR, SHOULD 7 ALL 1°S 
[WITH THE INPUTS OPEN 


BCDT2 

ARECBFO+12,R2 ;DONE? 

CMP2A :NO 

xe Cena + hy CORRECT NUMBER OF CHAR.'S RECEIVED? 


‘DIDN' T RECEIVE ALL DATA CHAR.'S 





on 
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RARER EERE EEE REE, ITI IKKE KEKE KHER EKEEKEK 


:THIS SUBTEST ADDRESSES THE MODULE FOR MODE ‘1° (EXT. SYNC) AND CHECKS 
:THAT ONLY AN 'EOT’ AND ONLY AN ‘EOT' IS RECEIVED BACK. 


TR OIRO ICIOIIOI IOI OIOIOISIOIOI IOI IOI IIT TTT TT TTT TTT TTT TTT TTT TTT TT TT TE 


BCDTe: 


000061 017231 #61,SOH1 3SET UP MODE ‘1° "EXT SYNC‘ 
017220 PC ,@AADRSRC ZADDRESS THE MODULE 
000004 MPB MEOT, (R2)+ ;WAS "EOT’ RETURNED? 


ZYES 
; "EXT SYNC’ DIDN'T RETURN AN ‘EOT’ 


RICCI ICR IORCIOCIOIOIOIUIOIOIIOIIORIORA A IA AIA IAISIIASISISSSSIS ASIII ASAI IASI SSSSSSSSSSSSS A. 
THIS SUBTEST ADDRESSES THE MODULE IN MODE ‘2° AND CHECKS THAT ONLY 
:DATA IS RECIEVED FROM THE MODULE. 


DI III II IORI TTT TOTTORI IIIT III IIIA IIIA SISIISISACSIS ISIS ISIS SI SIASSISISSISSISSSIS 


BCDT3: 


000062 017231 #62, SOH1 ;SET UP MODE *2' 
017220 PC ,@4ADRSRC ADDRESS THE MODULE 
000004 016244 w- Vetiuonscthigt te 31S "EOT" IN CORRECT PLACE 


. YES 
“ONLY DATA SHOULD BE TRANSMITTED IN MODE ‘2" 


I IORI ORCI TORII IOI TOOT TORT TORT TOT ITAA AISA ISASISSSISSSSSAS ASSASSIN SSIS MS. 
THIS SUBTEST ADDRESSES THE MODULE FOR MODE ‘3' (EXT. SYNC) AND CHECKS 
THAT ONLY AN ‘EOT* AND ONLY ‘EOT" IS RECEIVED BACK. 


Pliahelahalelehehehalehehehehelehehahahahahehehalhshalaieheleheleielaielelelelelslelalelalaleialeleleisieleisieieieieleieicieisioleleisioieioielel 


BCDT4: SCOPE 


4 
017231 MOVB #63,S0H1 ;SET UP MODE ‘3° 
JSR PC ,ADRSRC * ADDRESS MODULE 
wet, aes sWAS "EOT' RETURNED? 
as il 


ZYES 
EXTERNAL &SYNC* DIDN'T RETURN AN ‘EOT* 
030526 





an 


E 4 
CZPMACO PDM70 tage! TEST MACY11 30A(1052) 20-JAN-78 09:11 PAGE 22 
CZPMAC .P11 19-JAN=78 14:50 M7381 BCD INPUT MODULE ADDRESS TEST SEQ 0043 


SRI IOI OIRO I IOI IOI III IAAI SAINI ISI AIS NAS IISISIISSSSSSSSSSSSOSCSSOSS 


sTHIS SUBTEST ADDRESSES THE MODULE USING ALL THE WRONG 
ZMODULE ADDRESSES AND TESTS THAT THE MODULE ISN'T ENABLED. 


PICO RIO II ICICI RIOR IOIOIC IIIT ROIOIOROIIOIOIOI ITO IIIT TT AI IAAIIAAIS SSSI SSSSSSSIS SSS: 
104001 BCDTS: SCOPE 
000005 5 
004737 JSR PC, @4ADRSIT ; SUBROUTINE TO ADDRESS MODULE 

FOR IEC IORI IORI IORI IOI TOTO TOIT TOT TOT AIA AIA IASSIAISASSASSISSSASSSASSASAS 

STHIS SUBTEST REQUESTS THAT THE CUSTOMER SWITCHES BE RE-SET TO ALL ON 

: . THE PROGRAM THEN CHECKS THAT ALL 0°S 

: IF DATA SW10 IS NOT SET, THE FOLOWING SUBTESTS ARE SKIPPED. 


CRI III IIIT ICICI IIIS IIIT TOSI OTST OTIS SII OI ISI III 


BCDT6: 


#SW10,aSWR SW SET? 
BCDT11 sNO, SKIP MANUAL TESTS. 


023274 rv. UPDATE ;CHECK FOR SOFTWARE SwR 
003760 020774 MOV #. ,RETURN ;RE-SET SCOPE LOOP POINTER 


2 017231 MOVB #62,S0H1 SET UP MODE ‘2° 


00006 
017220 J PC ,@4ADRSRC ADDRESS THE MODULE 
000060 patie 

.+ 


DATA SHOULD TO ALL we S WITH 
THE INPUTS GROUNDED 
BR BCDT7 SEXIT ON ERROR 
016244 #RECBFO+10,R2  : DONE? 
CMP 2B ; 


DAO IOI SIIIOIIOIOIIDIOISIOISIDISISIIIOIOIUIOIOIUIOIOIIOIOITIOIOI III IOIOI CITT TORI TORI TORT TOT TIA 
:THIS SUBTEST REQUESTS THAT THE CUSTOMER SWITCHES BE SET TO ALL OFF AND 
CHECKS THAT ONLY THE ADDRESS, MODE AND ‘EOT' ARE RETURNED. 

SNOTE: IF DATA SW10 IS SET THE FOLLOWING TESTS ARE SKIPPED. 


TRA SOIOIUIEI IOI I OI ICIIOIOIDISIOISIEISIOIOIOUIOIUICICICIOIOI OIRO ICICI TT TT II I I TT TT TTT IT TT vn 


BCDT7: 


;TEXT "RESET MODULE TO ADDR. ‘17°. 
3SET CUST. SwW.*S TO ‘'0" 


023274 S UPDATE ;CHECK FOR SOFTWARE SWR 
00007 Wo? MODADR *SET UP NEW MODULE ADDRESS. 
#77. SRCADR 
012737 020774 #. RETURN :RE-SET SCOPE LOOP POINTER 





aa 
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004070 5 RECVRO ; ENABLE be DL11 RECVR. 

004072 000060 017231 #60,S01i1 :SET UP MODE ‘0° 

004100 017220 PC ,@AADRSRC ‘ADDRESS THE MODULE 
(R2) sWAS ANY DATA RETURNED? 

.+10 YES 

:DIDN'T ENTER DATA MODE 


BR BCDT10 7EXIT ON ERROR 
000004 016236 Me” Pigssrtaneln ;EOT SHOULD BE 3RD CHAR. BACK 
.+ 


:OK, IT IS 
[DATA WASN'T INHIBITED 


z 
R 


RERRRERE 
BRRERUSR 


FIO ICR IORI IU TR TTT TATA AIAIISSIIAISASISSSSSISSSSSSSSSSSSSSS. 
; THIS SUBTEST REQUESTS THAT THE CUSTOMER SWITCHES BE SET TO ALTERNATE 
ON & OFF AND CHECKS THAT ONE ‘4° CHARACTERS ARE RETURNED. 


FR IIIT ICICI TOIT SORORITIES TOTTORI OTTO OTTO RIOT IT 


BCDT10: i. 
PRINT 
023274 S PC, UPDATE ;CHECK FOR SOFTWARE SwWR 
004150 020774 MOV #. ,RETURN ;RE-SET THE SCOPE LOOP POINTER 


000062 017231 MOVB #62,SOH1 SET UP MODE ‘2° 
017220 PC ,@4ADRSRC ADDRESS THE MODU 


RERRRREEE 
SHSRESRKE 


LE 
000004 016240 #EOT .RECBF O+4 i HERE ONLY '4* CHAR.*S RETURNED 
; ‘ONLY '4' CHAR.*S SHOULD BE RETURNED 


030526 
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JIC ICICI III RIOR ICICI IOI IIT IOI ITO I TTT TTT IIA SI AAIISISSASSSSSSSS SASSI SSA 
;THIS SUBTEST TESTS THC DEVICE FLAG IN MODE ‘1°. A REQUEST IS MADE 

FOR AN EXTERNAL SIGNAL TO BE SUPPLIED. THE ‘BCD’ INPUT MODULE 

31S THEN ADDRESSED AND CHECKS THAT DATA WAS RETURNED. 


RII STITUTION ISSA SSA AAASISISISISISISIISISISSISISISSISSSSSISSSSISSO 


CZPMAC P11 19-JAN=78 14:50 


000061 017231 
017220 
016235 


031433 


000063 017231 
017220 
016235 


031433 


SEQ 0045 


BCDT11: + te 


; TEXT "SUPPLY AN EXTERNAL SYNC. 
SWAIT FOR 'CR* 
#61 ,SOH1 ;SELECT MODE ‘1° ;WAIT FOR DEVICE FLAG. 
PC , @#ADRSRC TADDRESS THE MODULE 
RECBFO+1 WAS ANY DATA RETURNED? 
BCDT12 YES, CHECK FORMAT 
NO DATA RETURNED WITH EXT. SYNC. 


RIOR OIRO ICICI OI IOI IORI TOR TOT TTT TTA IASAISAISSASISISIASSSSSASIS SSS AISI SSSA 
;THIS SUBTEST TEST THE DEVICE FLAG IN MODE '3°. A REQUEST IS MADE 

FOR AN EXTERNAL SIGNAL TO BE SUPPLIED. THE ‘BCD* INPUT MODULE IS 

; THEN ADDRESSED AND CHECKED THAT DATA WAS RETURNED. 


DRI TTT TTT ITI TOTTI TORSO TOTO RIOT TOTTI TOTO TOSCO IOUT TOT TOT TOR 


BCDT12: SCOPE 
12 


TEXT ‘SUPPLY AN EXTERNAL SYNC." 
SWAIT FOR 'CR' 
;SELECT MODE 3 WAIT FOR DEVICE FLAG 
PC ,ADRSRC ZADDRESS THE MODUL 
RECBFO+1 S ANY DATA RETURNED? 
BCDT13 :YES, VERIFY FORMAT 

7NO DATA RETURNED WITH EXT. SYNC. 


#63,S0H1 
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ORI IIIT TUSSI IIIT IOI TOTO SI ASSAAS SSS SISISNSSIASSISSSSSSSSS SASS 


; TEST COMPLETE 


DOI III IIIIIIIIOIIIOIOIIIUIOIOIIIOIIOICIOIOIUIOIIOIOIOICTOI ITO TTA IAA IAI SSASSSSSSSSSSSSSS SOS 


af 


BCDI13: SCOPE 
3 
PRINT 
MES7 
003456 JMP = BCDTO 


ROCCO ICICI ROTOR OIRO IRA STASI AAIISASISISIS IAAI SSASASI SSSA SAIS SISISS SSSA SSS. 
“SBTTL M7381 BCD INPUT EXERCISER TEST 

THIS TEST REQUESTS THE MODULE ADDRESS AND THEN CONTINUOUSLY 

TADDRESSES THE MODULE USING DATA SWITCHES ‘0 & 1' TO SELECT THE MODE. 

THE RECEIVED DATA IS THEN PRINTED ON THE TELETYPE. 


PUTTS TTT TT TIT TTI TTI TT TTT TTT TTT ttt iti titi titties, 


; TEST COMPLETE 


nl ah aad od aed cel cl ed 
lelelelelelelel=) 
ad aa a al aa aa och aD 
NOAWUESWN—O 


M7381E: PRINT 
MES32 


ADDRESS GET MODULE ADDRESS 
SETUP ;SETUP THE ‘'*R* ADDRESS 
021626 JSR PC, TTYENB ENABLE INTERRUPTS 


M381E1: “re 
M381E2: hi ; CHECK FOR KEYBOARD FLAG 


@SWR ,RO GET MODE FROM SW.'S 
#374,R0 CLR UN-WANTED BITS 


RO, SOH1 ;SET UP THE MODE 


017231 BISB #60,S0H1 
ENABLE THE DL11 RECVR. 
017220 J PC ,@#ADRSRC SADDRESS THE MODULE 
016224 RECEOT :HAS *EOT’ RETURNED? 
74 WAIT IT OUT 
020000 174746 #SW13,aSWR ; INHIBIT PRINTOUT? 
M381E2 


YES, 
“PRINT RECVR. DATA 
M381E2 
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= We RK RRR KKK EEE KEE EERE EKER 


"SBITL M7382 BCD OUTPUT MODULE ADDRESS TEST 


DORI III III IIIS IOIIIIIOIIOIIIIUIIUIUIOIIIIIIOIOIUIOIIOIOIOIIOII IIIT IOI INAS 


M7382A: PRINT 
$33 


ME 
ADDRESS 3;GE1 THE MODULE ADDRESS 
SETUP SET UP TEST PARAMETERS 


ORI IOIIIOIOIIIUIOIOIOIOIOI IONE IOI III III IIIT III TOIT 


STHIS TEST ADDRESSED 1HE &°D OUTPUT MODULE AND TRANSMITS '8' DIGITS 
[OF DATA AS ‘77°. THIS SHOULD CAUSE ALL THE OUTPUT LINES TO BE HIGH 


TCC A IO SUIEIEIOISIEIEISIOISIOISIOISIOIEISIEIEIOIOIEIEISIOISIEIOICIEIOITIEIII IIIT TOTTI OTR TOT AR ASDA AAAS AA 


OBCDT1: 8 
017234 PC ,,@4ADRDST ADDRESS DESTINATION 
; TRANSMIT THE FOLLOWING DATA 


31ST DIGIT 


LAST DIGIT 


PRINT TEXT ‘EXAMINE OUTPUT 

ME S34 

ME S35 CHECK FOR ALL LOGIC 1°S 
TTYIN ;WAIT FOR CHECK 





CZ 
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© eRe He RR TI ITT ITT IK KKK EEK KK EER KEKE EK KEK K 


[THIS SUBTEST SHOULD CAUSE ALTERNATE 'HI & LO ‘'S' TO BE SEEN ON THE OUTPUT 
SAORI ROTOR IIIT ITI II TTR I TTR TT TR TT AAI IAIAIAAISISIASISISSASASISSISS SSS SAN 
OSCDT2: o~ 
017234 PC ,@4ADRDST ADDRESS DESTINATION 
; TRANSMIT THE FOLLOWING DATA 


31ST DIGIT 


3 


LAST DIGIT 


TAG3B: 


;WAIT FOR CHECK 


DI II ITT TIT ITT TTR IR RRR REE REE REE REE 


; THIS SUBTEST SHOULD CAUSE ALTERNATE ‘HI & LO'S* TO BE SEEN ON THE OUTPUT 
IN REVERSE OF THOSE IN THE PREVIOUS SUBTEST. 
JOOS SIGIR SIOI I IOIOIOIOIOIOIOIOIOIOIOISIOIOI IOI IOI ITI TOR TOO TI TOT TOIT TOT TTT TT AISA S SASS ASSN 
OBCDT3: score 

PC ,@4ADRDST ;ADDRESS DESTINATION 


; TRANSMIT THE FOLLOWING DATA 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1} 
1 
1 
; 
1 
: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


Tt ln et rerpege pep pie peerpes oe et TET 
WWW MMhororonry Soli aestianetmaiapaitretenstantietien o oo 


sWAIT FOR CHECK 
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SRR II IR TOIT TORII III IITA AANA SAS ASA SASNASSSSISISSISOSASSISSSSSSOSSSSSIS SOS 


:THIS SUBTEST CONTINUOUSLY ADDRESSES THE MODULE ENABLING THE USER TO SCOPE 
[FOR THE SIGNAL ‘OUTPUT DONE 'H & L' 


Srerrirereteerirrttitettetititiitiiti titi tt it iti tt iti rit t itt, 

OBCDT4: pies 
PRINT 
MES38 ; TEXT SCOPE FOR OUTPUT DONE 

017234 TAG3D: JSR PC ,@4ADRDST SADDRESS DESTINATION 

LDCHRO 
EOT 
BR TAG3D CYCLE UNTIL RESTARTED 


- 
— 
WG 
Vv 


-SBTTL BCD 1/0 TEST 

DI III III III IOI ICICI IOI ITI SO TOSI OOS TTI I IN 
[BCD INPUT/OUTPUT EXERCISER TEST 

: THIS , TEST at BOTH THE BCD ‘INPUT&OUTPUT* MODULES. AN uk a 

;"BCD' COUNT IS SENT TO THE OUTPUT MODULE AND WRAPPED AROUND VIA 

‘SPECIAL CABLE TO THE INPUT MODULE. THE DATA RECEIVED FROM THE INPUT MODULE 
71S THEN VERIFIED AGAINST THE TRANSMITTED DATA. THE INPUT MODULE CAN 

7BE SETUP TO USE EITHER INTERNAL OR EXTERNAL SYNC. IF EXTERNAL SYNC IS 
;SELECTED, THIS SIGNAL IS eer FROM THE SIGNAL ON THE BCD OUTPUT 
SMODULE KNOWN AS OUTPUT DATA H 


preverevrevervorreerrtrrertr titi ittitttitiitiiittiiiiitiitti titi tii i itis) 


BCDIO: 


MNWM MUI WVIVIVIVI ES BEER REE OW 


ARANISSELEALALTIS SSVF ARUN LS GOVEGRGNLSSHVE 


3TEXT ‘BCD 1/0 TEST’ 
:GET THE MODULE ADDRESS 


: TEXT "INT OR EXT SYNC.?° 
INPUT 


WAIT FOR 
000111 015330 #111, INBUF pal be FOR INTERNAL? 
+12" ;YES, SET UP FOR INT. SYNC. 
000061 017231 - #61 ,SOHI [NO, SET UP FOR ENT. SYNC. 
+1 
000060 017231 #60,S0H1 


mee ee me kk ee ke ek ek ed kd ed od dd od td I ot 1 So ot I oS SS oh SS a 


; 
; 
1 
1 
] 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
) 
: 
1 
1 
1 
F 
1 
j 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


;SET UP TEST PARAMETERS 
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DASA IRE ISIS IOISIIDIOISISIOIIDIOIIISITIEIOICIOIOIOI IOI IOI TOT TOTO TOOT T STOTT STOTT TOT TOT TTT TTT TTT TTT 
[THIS SUBTEST OUTPUTS ” DATA PATTERN OF ‘'60-77' TO EACH ‘BCD’ OUTPUT, 
ZONE AT A TIME. THIS PATTERN IS THEN READ BACK BY THE BCD INPUT 

:MODULE AND COMPARED AGAINST THE OUTPUTTED DATA. THIS TEST WILL VERIFY 
THAT EACH OUTPUT LINE CAN BE ADDRESSED AND THAT NO TWO OUTPUTS ARE 
:SHORTED TOGETHER. 


rreretcrivetrrtritrittittitiititiittittitiititi iti it titi ii 


BCDIO1: NOP 
NOP 


INN 
ono 


#DATA1,RO :SET UP DATA TABLE TO TRANSMIT ALL O'S. 
#60, (RO) + 

#DATA2 RO : DONE ? 

#DATA1,R1 ‘SET UP DATA POINTER 


PC ,,@4ADRDST ADDRESS DESTINATION 
; TRANSMIT DATA 


:GO HERE WHEN DONE 


mk ae ek a ae od ot ot = i“ ts SS ss 
BSLERRASLESELEALATZSS 


200 
201 
202 
203 
204 
205 
206 


y 


: ENABLE THE DL11 RECVR. 
017220 JSR PC ,@#ADRSRC ADDRESS BCD INPUT 
;GIVE ‘EM TIME TO READ THE DATA. 
004712 MO #DATAI ,R2 7SET UP TO VERIFY DATA 
016236 #RE CBF O+2,R3 
rs aa :DATA EQUAL ? 
+ 


;YE 

INPUT DATA DOESN'T EQUAL DATA OUTPUT 
TAGSE +2 EXIT ON ERROR 
#DATA2 ,R2 ; ? 
TAGSC NO, COMPARE NEXT BYTE 


(R1) ;UPDATE DATA PATTERN 

#100,(R1) : DONE ALL CODES FOR THIS OUTPUT? 
TAGSA TRANSMIT NEXT PATTERN 

#60, (R1)+ YES, RESET IT TO "60°. 

#DATA2,R1 “DONE WITH TEST? 

TAG4D [NO, START NEXT OUTPUT TEST 


:TEST COMPLETE 
BCDIO1 RESTART TEST 


Et 


MONINMININYNINM PNP 
Oe ee eee 
SOOONOUSWN—oO 
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DICER ISI I ISIE ICICI IIE III IIIT TTT TTT TTT AAA AIS SSS 

.SBTTL M7383 A/D INPUT MODULE ADDRESS TEST 

: THIS TEST IS USED TO VERIFY THAT THE A/D MODULE CAN BE ADDRESS 
AND THAT IT WILL RETURN DATA ON COMPLETION OF A CONVERSION. 


pene rerrrrenrr irr arnr arr Tver tr rierenrrrr erry rrr errrr ren 


M7383A: PRINT 
MES11 ;TEXT ‘A/D ADDRESSING TEST.’ 
ADDRESS GET MODULE ADDRESS 

ADTO: SETUP SET UP TEST PARAMETERS 


BEES SISISISISIIIIOIIOIOIISISIIOIOIIOISIIOIIIIOIOIIOIOIIOIUIIOI IOI ITI TT TTT TTT TTT TTT 
[THE FOLLOWING SUBTEST ADDRESSES THE A/D MODULE AND VERIFIES THAT 
[DATA AND "EOT' ARE RETURNED BY THE MODULE 


TSAI EE IOOUISISIOIIEISII SIO IOISISIEIISIOISIOII ISI OOOO II 
ADT1: NOP 
NOP 
000063 017231 #63,SO0H1 ;PROGRAM CH.'3' 
017220 PC ,@4ADRSRC ;ADDRESS MODULE 
016235 : - wet” i it RETURNED? 
.+ 
‘ MODULE DIDN'T ENTER DATA MODE 


BR ADT2 EXIT ON ERROR 
016224 RECEOT ;WAS ‘EOT' RETURNED? 


.+10 YES 
sMODULE DIDN'T RETURN ‘EOT' 


BR ADT2 EXIT ON ERROR 
016244 oe RECEP ON TG CORRECT NO. OF CHAR.*S RETURNED? 
-* ; 


7 YE 
DIDN'T RECV. CORRECT NO. OF CHAR.'S. 


[ERA EERE AREER REE ERE EEE EERE EERE EREERERRE EERE EEE 


THIS or 4p ADDRESSES THE A/D MODULE USING MODE ‘8' AND TESTS 
HAT THE CORRECT NUMBER OF CHARACTER ARE RECEIVED BACK. 


nr Ba Tre | Mier BE nme Mee Blas 5 Reve an OTE GER 
ADT2: eat 


000002 
112737 000070 017231 MOVB #70,S0H1 PROGRAM MODE '8* 
004737 017220 JSR PC ,@#ADRSRC TADDRESS MODULE 


C46 000004 016274 : ~—_ et AEE sor SHOULD BE RETURNED HERE 
-* P 
MODULE DIDN'T RETURN °4° CH.*S OF DATA 





ao 
Ns 
w 
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1280 


1281 PERERA EERE REE EERE, TREE EEE EERE KEE EEK 


:THIS SUBTEST ADDRESSES THE ‘A/D’ USING THE WRONG MODULE ADDRESSES 
SAND TESTS THAT THE MODULE ISN'T ENABLED. 


TS EEEEEEIEI EI IIOISIOISIOI RIC ISIIIEIOIOICICICIOIOOIOIDIOITITIOIOI II TTT TT TT ST TT IO 


ADT3: ie 
005154 PC ,@#ADRSIT 
BR ADT4 


oO 
MN 
wv 


032132 ADRSIT: USING THE SERIAL INPUT? 

BN TYES, INHIBIT RUNNING THIS TEST. 
000060 005211 MO #60 ,ADCHX1 SET UP 1ST ADDRESS TO BE TESTED 
032134 005211 TAG2C: MODADR,ADCHX1 EQUAL TO SELECTED ADDR.? 

B TAG2F YES, SELECT NEXT. ADDR. 


. sALERT MODULE 
ADCHX1: . 60 ADDRESS MODIFIED FROM '60-77° 


ENABLE MODULE 


i kk ee ed ed ed ed ed od od ot ot ot 6 J 


SSSSSSesssssTzey 


—_ ANY DATA RETURNED 


MODULE WAS ENABLE WITH ILLEGAL ADDR. 


TAG2F 
3 005211 031166 MOVB ADCHX1,ERR13A 
031124 


105237 005211 T : ADC ;UPDATE MODULE ADDRESS 
122737 000100 005211 C 7100. e ocunt ; DONE ? 

001350 BN TAG2C 

000207 : PC 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


WWWWAWWAWG 
ed ad ed ed ad ed ed 
NOWEWN Oo 
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CZPMAC .P11 


x 


BAAAABAAAARKELEL ESE 
BOYRARWVISCBNAURWN=S 


1 
; 
; 
; 
; 
1 
; 
. 
1 
} 
; 
; 
1 
1 
1 
1 
7 
1 
; 
] 
; 
: 
} 
; 
1 


SESSE 
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002000 
005274 
000077 


000064 
017220 


000000 
005354 


000340 
005370 


6 
000137 005022 
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174066 


020774 
017227 


017231 


3 A/D INPUT MODULE ADDRESS TEST SEQ 0053 


DICER ISIC III IIIT IOI II TTT TTT TTT ADIT IAS ISS SAISSSSS SAN 
; THIS SUBTEST CHECKS THAT THE A/D MODULE WILL WORK UNDER EXTERNAL SYNC. 
;THE MODULE IS ADDRESSED AND THEN A REQUEST IS MADE FOR AN EXTERNAL 

;SYNC SIGNAL TO BE SUPPLIED. 


FI RC TCI T TOTO TOT TOTO TOTTI TOS IOR SOTTO IOSOSOIOIOSOIOTOTOIOSI IOSOSIO I OII ASIA ASSIS SSSI ISS SIS 


ADT4: _ 


#SW10,aSWR SW. '10° SET? 
NO, INHIBIT THIS TEST 


: TEXT "RESET MODULE ADDR. 
‘WAIT FOR SETUP 
#. ,RETURN ‘RESET SCOPE LOOP POINTER 
#77, SRCADR :SET UP ADDRESS ‘17° 
TENABLE THE DL11 RECEIVER 
#64,S0H1 sEXT SYNC; CHANNEL ‘O° 
PC, @#ADRSRC SADDRESS MODULE 
(R2) ‘MAKE SURE NO DATA WAS RETURNED 


EXT SYNC CONVERSION TOOK PLACE 
;WITH NO EXT. SYNC SUPPLIED. 
;EXIT ON ERROR 


TEXT "SUPPLY EXT. SYNC SIGNAL’. 
ub ENABLE INTERRUPTS 


-(SP)  ;INHIBIT INTERRUPTS 
-(SP) 


;WAIT FOR DATA 
;WAS A DATA RETURNED 


7 YES 
sNO DATA WAS RETURNED WITH 
EXTERNAL SYNC. 


FI III IIIT TOTTI TOTO TOT TOTO SOTTO TOTO SOIT ITI OTS TNS SIAN 


: TEST COMPLETE 


FFI II II IIIT II TTI OT TOIT TO TOTTI TOI TOTO TTT TOSI TOIT TOT TORSO OTST TOT TOTTI OT IIIT 


ADTS: wate 


PRINT 
MES7 TEXT ‘TEST COMPLETE’ 
JMP ADTO ;RE-START TEST. 
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FACIE SCIOTO I ITO II IORI TOT TTT A TIAA AISAIISIASIISSASSASSAS SSSA SSS IS. 
“SBITL M7383 A/D CALIBRATION ROUTINE 

; THIS ROUTINE TAKES CONTINUOUS CONVERSION USING DATA SwW'S '0=4°IN OCTA 

;WEIGHT TO SELECT THE CHANNEL TO BE CONVERTED AND THEN PRINTS THE CONVERTED VALUE 


; CHANNEL SELECTION IS AS FOLLOWS: 


“DATA Sw'S ‘O-1" SELECT "INT. SYNC’ ON CH.'S 0,1,2 OR 3 

DATA SW' '2° & 'O-1" SELECT ‘EXT SYNC* ON CH. *s°0, 7 ,2 OR 3 
DATA SW '3' ONLY SELECTS "INT SYNC’ CONVERSION ON ALL oe CH.°S 
DATA SwW'S ‘283° SELECT ‘EXT. SYNC" CONVERSION ON ALL °4" CH.'S 


I III ITE ICICI IO ITSO TOIT TOTO SOIT ISOS IASI IASI ISIS SSI ISISIASSSISISSSSISSSSI SOIC 


M7383C: PRINT 
MES12 3 TEXT ‘A/D CALIBRATION ROUTINE’ 
ADDRESS ;GET MODULE ADDRESS 
021442 JSR PC,REMOTE ;CHECK FOR REMOTE DESTINATION 
ETUP ;SET UP THE ‘*R* RESTART ADDRESS 
000001 MO #1,R1 ;SET UP FOR ‘1° CONVERSION 
ser’ N ;SET TRANS. DELAY INHIBIT SW. 
L : 


CRL 
CALBT2: ; CHECK FOR KEYBOARD FLAG 
173700 MOVB aSWR ,R3 GET CHANNEL 
000300 #300,R3 ;CLR UN-WANTED BITS 
000060 #60,R3 ;CONVERT TO ASCII 
017231 MO R3,S0H1 7 SET oo CONVERT CH. 


; CONVE 
020000 173654 BIT #SW13,aSWR ; INHIBIT TYPEOUT? 
CALBT2 ;YES, TAKE NEXT CONVERSION 
021502 PC,SETRMT ;CHK FOR AND SET UP REMOTE DST. 


PRINT RECV'D DATA 
021524 ata ;CLEAR REMOTE DESTINATION 


SBERSPERess 


8 
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IO I ROI I OIOIOI I IOICIIOIOIOICI IOI TITRA ITAA IAAI ISASISSSS SASS SAN 

-SBTTL M7383 A/D REPEAT IBILITY TEST 

THIS TEST REQUESTS FOR A CHANNEL AND A V.S.F (VERTICAL SCALE FACTOR) TO 
[BE INPUTTED FROM THE TELETYPE. A SERIES OF ‘100° CONVERSIONS A THEN TAKEN, 
AL ETIPE THEN THE RESULT IS DISPLAYED IN A HISTOGRAM FORMAT ON 

H ° 


TEESE IOIOIEIISISIIISIISIOIIUIEIOIEIOIIDI CIO IIT TTT TTT TTT TTT TT 


M7385R: PRINT 
MES15 TEXT ‘A/D REPEATIBILITY TEST’. 
[GET THE MODULE ADDRESS 
021442 PC ,REMOTE CHECK FOR REMOTE DESTINATION 
;SET UP RESTART ADDR. POINTER 
[SET TRANS. DELAY INHIBIT SW. 


REQUEST ‘VSF* 
;CONVERT INPUT TO BINARY 
; VSF=07 


YES, ILLEGAL ENTRY 
“SAVE INPUT 


NO 
REPTOA: 
M 


KSTOR1,LODIVR ;SET UP TO DIVIDE ‘VSF* TO GET NO. OF AVG.'S 
#100. ,LODIVD 
PC DIVIDE 
016126 1S NUMBER LEGAL? 
NO, REQUEST NEW ‘VSF' 
016122 032202 QUOENT,KSTORS = ;YES, SAVE IT 
032174 032204 KSTOR1,KSTORS 


032204 KSTORS 
C REQUEST CHANNEL 
000144 : V #100. ,R1 ZSET UP TO TAKE ‘100' CONVERSIONS 
017670 MO ATRNBFO,R2 SET UP TO SAVE CONVERTED VALUE 
STAKE 100 CONVERSION 
zAVERAGE THEM 
016120 MOV #LOW,RO SET UP TO SAVE VALUES 
a. MAVGTAB,R3 SAVE AVERAGE HERE 


#3,R 
(RO) +, (R3)+ SAVE AVG HIGH & LOW 
R4 SAVED ALL VALUES 


BN 74 zNO 
016122 QUOENT ,RO ;SET UP AVERAGE 
#9. ,RO CALCULATE AVERAGE +9 VALUE 
ot ie T 


:SAVE I 
«R ; CALCULATE AVERAGE -9 VALUE 
RO, KSTOR3 ;SAVE IT 


E 
:SETUP 7° AVERAGE OUT 'VSF' 
ae i TAKE ‘X* AVERAGES 


YES, NO AVERAGING NEEDED 
:D0 IT 


016122 "MOV QUOENT,(R3)+ = SAVE VALUE 
032204 KSTORS .R2 :SET BUFFER POINTER TO PICK UP NEXT GROUP 
N 


005304 R 
001371 REPT2 :NO 





ono 


CZPMACO PDM70 DIAGNOSTIC TEST 


CZPMAC .P11 
012702 
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032310 


017670 
032226 


032302 
032202 
032176 
032300 
032200 
032226 


032200 
032230 


021502 


MACY11 30A(1052) 


REPT3: 


E 
20-JAN-78 09:11 
M7383 A/D REPEATIBILITY TEST 


HAVGTAB+6 ,R2 


oe” 
#TRNBFO,R2 
AORL OW, RO 


(RO) + 
eae 


KSTOR4 RO 


RO,R1 
(R2) ,.KSTOR2 
+10 


ORHIGH 


REPTS 
(R2) ,KSTOR3 
.+10 


ORLOW 
REPTS 
(R2) ,R3 
KSTOR3,R3 


R3 
MINUS9(R3) 
(R2)+ 


RO 
REPT4S 
PC,SETRMT 


5 
PAGE 35 
SEQ 0056 


:SET UP TO CATEGORIZE AVERAGES 
:FOR VSF OF ‘1° USE ACTUAL VALUES 
‘SET UP TO CLR COUNT BUFFER 
[CLR BUFFER 

* DONE ? 

NO 

‘KSTOR4 CONTAINS VSF 

a VALUE > AVG. +9? 

“YES, VALUE OUT OF RANGE 

A ae < AVG. -9? 

“NO, OUT OF RANGE 


;GET VALUE TO WORK ON IT 
OBTAIN OFFSET 


; INCREMENT CNTR 
; INCREMENT POINTER 
DONE ? 


zNO 
;CHK FOR AND SET UP REMOTE DST. 


fo oe] 


8 FOR RCIOORIOIOIORIOIIIIIOISI IIIA IAI SII SSIAIA ISIS AIA ISAIA ISIS IAAI ISSA ANSSSSASIS. 
z;AT THIS POINT THE AVERAGES HAVE BEEN TAKEN AND CATEGORIZED. THE 
NEXT SECTION DISPLAYS THE COUNTS IN A HISTOGRAM FORMAT. 


PRR RR t hth tk kk Seka he keke ke alah le lake hahahahahahaha lehehehehelahelelehehehahehelaleleleleleieleieleleleleielelel 


001762 


032230 


032300 


021262 


032300 


REPT6: 


C 
REPTB8A: 
B 


AMINUSI,R2 
R3 
R1,(R2)+ 
REPT7 

R3 

#ORHIGH ,R2 
Sra 


R 
REPT6 
REPT9 


R3,SPACEX 
+4 


-(R2) 
(R2)+ 


R3 
#ORHIGH ,R2 
T6B 


REP 
R1,(R2)+ 
REPT8 


SET UP COUNT TABLE 


SCAN TABLE FOR CURRENT COUNT 
COUNT FOUND, PRINT IT 


: SCANNED WHOLE TABLE? 
TINUE 


;NO, CON 

YES, CHECKED ALL COUNTS? 
3;NO, RE-SCAN TABLE 

STYPE FINAL DATA 


s;ANY SPACES TO BE TYPED? 
3NO, PRINT ASTRICK 
:YES, PRINT SPACE 
[SUBTRACT '1° FROM COUNT 


;DONE CURRENT SCAN? 
YES, EXIT 

NO, IS THIS COUNT EQUAL? 
YES, PRINT IT 
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«NO, INC. SPACE CNTR. 


—_ 
Ww 
= 
Nm 


R3 
REPT8A 


BR 
014236 REPT9: RECBFO+2,R1 SAVE GAIN SETTING 
000114 C #°L,RI1 


.+10 
031753 006236 AXIMV ,REPT10 
000115 #'M,R1 


.+10 
031757 006236 #X100UV,REPT10 
000110 #'H,R1 


.+10 
031765 006236 #X10UV,REPT10 


RUNNING WITH LOW GAIN? 
;NO 
— WITH MEDIUN GAIN? 


er WITH HIGH GAIN 
7N 


;PRINT HORIZONTAL SCALE HEADER 


mm me De cD ed ed ee ed ed ed od 2d 
MMNMAMAVINVI VIII) 
RVD 22 a So ae 
AUEWN$OD0ONAUEW 


REPT10: 0 
006320 PC,REPT13 sPRINT SUMMARY 
032226 REPT11: ORLOW,R5 
032300 ORHIGH,R5 ;WERE ANY COUNTS OUT OF RANGE? 
REPT12 ZNO, RE-CYCLE TEST 
s TEXT ‘OR-LOW 


PRINT COUNTS LOW 


032226 MOV ORLOW,R2 


032300 MOV ORHIGH,R2 
REPT12: 


021524 PC, CLRMOTE ;CLEAR REMOTE DESTINATION 
005636 RPT12A: REPTO 


000003 REPT13: #3,R3 7SET UP PRINT LO-HI & AVG. VALUES 
032302 ;SET UP BUFFER POINTER 
REPT14: GET VALUE 
007040 RS CONVERT & PRINT IT 
+4 
PC 
000002 021262 MO #2,SPACEX 


REPT14 


PRINT COUNTS ‘HI' 
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104012 


032222 
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LEAR REE REE EEK tARRRSESSELESASSLSS SESE SESS ERAS RASA RES S RS ARDS DD DS 


.SBTTL M7383 A/D GAIN ACCURACY TEST 

; THIS TEST REQUESTS OF A SERIES OF VOLTAGES A SPECIFIED GAIN SETTINGS 

;TO BE SUPPLIED TO THE ‘A/D'. A SERIES OF A HUNDRED CONVERSIONS ARE TAKEN 
:AT EACH OF THESE SETTINGS AND AVERAGED OUT. THIS AVERAGE IS THEN TESTED 
;TO BE WRITTEN ‘+ OR -" A COUNT FROM THE TRUE VOLTAGE VALUE FOR THAT 
>SPECIFIED SETTING. 


Pevetetrtt ttt itt t titi tittitii iii iii iii tilt i iii rere 


M7383G: PRINT 
MES18 


;TEXT "A/D GAIN TEST‘ 
:SET UP RESTART ADDR. POINTER 
REQUEST & STORE CH. TO BE TESTED. 
:TEST '+1.990V" AT ‘LOW’ GAIN 

PRINT 

MES19 :TEXT "SUPPLY +1.990V' 

PRINT 

MES20 sTEXT "AT LOW GAIN 

age 

;LOW GAIN 

7625 ; TRUE VOLTAGE VALUE + OFFSET 
; TEST -1.990V AT ‘LOW' GAIN 

PRINT 

MES21 ;SWITCH VOLTAGE NEG. 

WAITGN 

“; 

11 ; TRUE VOLTAGE VALUE + OFFSET 

.1990V AT LOW GAIN 
sTEXT "SUPPLY® +.1990V° 
s TEXT "SUPPLY +.1990V' 


:GAIN MED. 
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TEST '=.1990V AT "LOW" GAIN 


PRINT 
MES21 TEXT "SWITCH VOLTAGE NEG." 
~~ 


003410 3410 
TEXT 'O.0V" AT LOW GAIN 


104012 PRINT 
MES25 TEXT "SUPPLY +0.000V.° 
aes 


003717 3717 


FUORI OICIOIOIUIOIOIUIIOIOIOIOIOIOIOIEIOI III III ITI IIIT TOTTI ASAI ISIS ISSA SAS SASSI. 
;TEST COMPLETE 
SOIR IOI OIRO ICICI SIOIOIOIOIOI ISTERED IORI IOI IOI IOI TOIT TOIT TRIAS IASI IISA ISS SSAIS SSS AS. 
104012 PRINT 
; TEST COMPLETE 


ME S7 
BR M7383G+6 ;RE-START TEST 
NOP 


CR RRC ICRI ISIS AIA IAI IA ISISIIAIISIISE IIIS AISI III IIIA IAI IISA SS SAS. 

.SBTTL M7383 A/D GAIN AVERAGING SUBROUTINE 

THIS SUBROUTINE WAITS FOR 'CR* THEN TAKES AND AVERAGES '100' A/D CONVERSIONS. 
THIS COMPUTED AVERAGE IS COMPARED AGAINST THE TRUE VOLTAGE VALUE FOR A 
SPECIFIED SETTING. THE AVERAGE IS PRINTED OUT IF FOUND TO BE MORE THAN ‘+ OR -" 
;1 COUNT FROM THE AVERAGE 


Pla R RRR fehl Reha ke he Rekha hahahaha hehehehehe hehehehahehelelehahelelhelelaleleleleleheleialelelelsieleheleieleleleieleleleicleieleielelel 


017603 000000 XWATGN: xs etre :PICK UP GAIN CODE FROM CALL +2 
' 4 " 
ML a(SP) ,R4 :PICK UP TRUE VOLTAGE VALUE 
WAITG1: Lis peer :WAIT FOR *CR* TO CONTINUE 


016236 MPB oes i CODE CORRECT? 
.+ 
=NO, TELL HIM ABOUT IT 


WAITG1 ;WAIT FOR SETUP 
012701 000144 #100. ,R1 SET UP TO TAKE ‘100° CONVERSIONS 
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012702 


000727 


062716 
000002 


017670 


016122 


000002 


020000 
020000 
032222 
032222 


006003 
016120 
006330 


000002 
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172546 
172536 


7383 A/D GAIN AVERAGING SUBROUTINE 
WAITG2: MOV ATRNBFO,R2 = SAVE THEM HERE 
AD ; TAKE THE CONVERSIONS 
ZAVERAGE THEM 


AVERAGE = TRUE VALUE? 
:YES, EXIT 


AVERAGE = TRUE VALUE +1? 
sYES, EXIT 


sAVERAGE = TRUE VALUE -1? 
BE GANE XT EX T 
WAITG3: #SW13,aSWR “NO, “PRINT INHIBIT SW. SET? 
BN WAITGe : YES 
aoe SW SET? 


:YES, INHIBIT ERROR TYPEOUT. 
“NO, HAS ERROR HEADER BEEN TYPED? 


#LOW,R1 
PC ,REPT14 


WAITG2 
#2, (SP) 
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FAO RICCI IOI IIIT IR ITAA AIA IISAIISIAAISISIIS SSIS ASSISSS SII IASI SSSA NASA S AS 
-SBTTL A/D CONVERSION ROUTINE 

;THIS ROUTINE TAKES AN A/D CONVERSION AND ENABLES 

;DL O°S RECVR TO ACCEPT & STORE THE CONVERTED VALUE 


DRI IIIT ITI SO III TOOK IIIS ASA IIASA SI AISISISISIIAISISISISISISSSISSSSISISSSSSOSSSCSOS 


017670 
000000 
006710 
017220 
016224 


016237 
016240 


015330 


XADCNT: SAVREG 
MOV 


eere.e 


0, -(SP) 
#ADCTO, = (SP) 


PC ,@4ADRSRC 
ee 


#RECBFO+3, R3 
(dis RS 


(R4)+, INBUF 


;SAVE REG.'S 
SAVE CONVERTED VALUES HERE 
sENABLE INTERRUPTS 


ENABLE THE DL11 RECVR 
SADDRESS MODULE 


:WAS ‘EOT' RETURNED? 
3NO, WAIT FOR CONVERT 
;SET UP ADDRESS TO PICK UP SIGN 
;SET UP ADDRESS TO PICK UP DATA 


;SET UP NO. TO BE CONVERTED 


015332 "MO (R4) , INBUF +2 
000004 032214 #4, CHRCNT 


022564 MO BCDTAB, (R5) 
000053 #53, (R3) 


;CONVERT VALUE TO BINARY 
SAVE IT 
:VALUE POS.? 


0% YES, LEAVE AS IS 
: 
032130 OFFSET. (RD)+ 


ZNO, 

ADD OFFSET 

;CONVERTING ALL °4* CH.'S? 
:NO, EXIT 


0 
000004 iors. Ext VALUES? 
000010 :NO, PICK UP NEXT ADDRESSES 
000006 


000010 017231 


SSS 


; TAKE NEXT CONVERSION 
104003 
000002 RTI :NO, EXIT 


FI III TIT II TITRE RRR ERE REE RRR ERE 


; SUBROUTINE TO CONVERT THE VALUE IN ‘R2* BACK TO A "TRUE" A/D VALUE 
ZAND PRINT IT IN DECIMAL AS EITHER ‘+ OR-" 


© 
DOI IIIIOIIII II IIIOIOIOIOIOIIOIIIIOIOIOIOIOIOIUIOIIOIOIOIOIOIOIOIOI III IOI 


POSTIT: SAVREG 
000053 MOV #53,R1 
032130 OFe eE Re 
.+ 


:SET UP TO PRINT '+" 

; SUBTRACT OFFSET TO OBTAIN REAL VALUE. 
VALUE POS. ? 

NO, COMPLIMENT IT 

ZNO, SET UP TO PRINT ‘= 


TYPE VALUE 


NONMONNON @ SB @ SB SS RS Sa 
MBWNH—OODNAUSWN Oo 


ANNAN SAA Aad 


me ek ed ek ee ed et a td od ot 2 


VN 
Oo 


R2 
000055 MOV #55,R1 


007066 
007070 000207 T PC 
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PERE SASASESASS SEALS SSE RSLS E SESE SECS SS SSR SRS ERR SRR R SRS RARE SSSR ARES DDS DS 


"SBITL M7384 D/A ADDRESSING TEST 


II Be BRIO SOIT IIIS ICIS OSS AISI SII SII INA AISSISIISASISASIAISASSISISISISISI ISIS SISSISSCS SC 


007072 104012 M7384A: PRINT 
MES45 


007074 TEXT "D/A ADDRESSING TEST’ 


ADDRESS ;GE1 THE MODULE ADDRESS 
SETUP ;SETUP TEST PARAMETERS 


FR IORI IOI IORI IOI IORI IIIA IIA IAISAIIASIISSIIISIISASISAI SAS SAIS IIS AIS SAS SAS ISAS SSSA 
THIS SUBTEST ADDRESSES THE D/A MODULE SENDS A CODE OF ‘70° (MODE 8) 

THIS SHOULD ENABLE THE SIGNAL ‘PROG L* TO BE LOW UNTIL THE 2ND CHAR. 

71S SENT TO THE MODULE. 


BI I III IOI II III IOI IOI TOIT OI III IIIA IAA AISI ISSA SAIS NISIS SSIS SISISISSIASISSSISISSSSISSCS CS 


DAT1: NOP 


NOP 
017234 JSR PC ,@4ADRDST ADDRESS THE MODULE 
aaa 


SEND THE CHAR. '8' 
TEXT ‘SCOPE FOR ‘PROG L* HI" 


;WAIT FOR ‘CR’ TO CONTINUE 
SEND ‘EOT’ 


SCOPE FOR ‘PROG L HI & FLOP L LO" 


RRR ORICA ITA IAI AA IAIA IASI ISISAISASISSISA ISIN SAA AA ISIS ASSIS ISS SIS. 
THIS SUBTEST 1ST ADDRESSES THE MODULE AND SENDS MODE ‘9° TO SET 

THE ‘FLOP’ FLOP. THEN THE MODULE IS RE-ADDRESSED AND SENDS MODE ‘8° 

:TO CLR THE ‘FLOP* FLOP. 


[CRORE ICCC TORII IORI OITA IAA IA IASI ISIIAISAIISISASISSIISSIIASIISAISAI SAIS ISIS IS SSSI AN. 
DAT2: _— 
017234 JSR PC ,ADRDST ;ADDRESS MODULE 
LDPGMO 
+4 
;SEND CHAR, ‘9° 


:SCOPE FOR ‘FLOP L* HI" 


017234 sRE-ADDRESS MODULE 


SEND CHAR. ‘'8' 
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007202 026401 MES49 ;SCOPE FOR ‘FLOP L" LO 
007204 104013 TTYIN 


III III IIIT ICICI TO TORII TOIOICICTOIOTOIOITIOI TOIT OI OSI IIS ISNA NSS NS NISSAN 


THIS SUBTEST OUTPUTS 0.00 VOLTS TO CH. ‘O'. 


RIOR ICCC IIR ICICI IORI AIA IAA IAI IAISASIIIA ISSA SII IIIA IISA I ISIS SI SASISSSSSAS SSS. 
DATST3: abe 
030061 007776 MOV #30061 ,DATA3 :CH. 'O" O VOLTS 


030060 010000 #30060 ,DATA4 
007746 PC ,DAOUT SEND DATA 


z 


I IB FI IIE SE SII STOTT STOTT IIIT TOIT TTI I IIIS III SSSI SIS III ISN 


THIS SUBTEST OUTPUTS 1.11 VOLTS TO CH. ‘O'. 


DAI I III IIIIITOIOIOIOIOIOIOIOIOIOIOOIOIOIOIOIOIOIOIOIOTIOI OITA ISIN AAI AIA AAI ANI AIS SAIS ISIS ISIE 


efoto th tothe RPS ah 


DATST4: SCOPE 


4 

030461 007776 #30461 ,DATA3 
030461 010000 #30461 ,DATAS 
007746 PC ,DAOUT 


0 00 00 00 00 C0 CO C0 C0 CO 
ek ad ced ed aed ed ced ed ed ed 


CRITI IOI ISO IORI OIRO SOIT OTTO TOTS OS IOI ITI I I IISA IAS ASIII SSS ISS I AE 


THIS SUBTEST OUTPUTS 2.22 VOLTS TO CH. ‘O'. 


SKIRT RIOR IOI RIOR IRIE AIDA I IAAI IIIA IIIA IISIIAIIIASIIIAI SAI AAI IAI SAIS AISA. 
DATSTS: oh 
031061 007776 #31061 ,DATA3 


031062 010000 #31062 ,DATA4 
007746 , PC ,DAOUT 


1 
} 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1 
: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


SCUONAUSWN—O 


& 
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032061 
032064 
007746 


034061 
034070 
007746 
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007776 
010000 


007776 
010000 


007776 
010000 


M7384 D/A ADDRESSING TEST 


© We Be He He ee ie ee ee ee RR TTT TTT II TTI TT TTT TTT TOT TTT TTT TERRE REI K 


STHIS SUBTEST OUTPUTS 4.44 VOLTS TO CH. 'O'. 


DIOR III ICICI TOR ICICI IOI III IORI TI ITT TTT TTD IAI ISAISAISISSSSSSSSSSSSSSSSSSSSSSM. 
DATST6: ook 


MOV #32061 ,DATAS 
#32064 ,DATA4 
PC ,DAOUT 


= Be He He TI I I II TI TTI KK KIKI KKK KEKE KEE KEKE KEK EKEKKK 


‘THIS SUBTEST OUTPUTS 8.88 VOLTS TO CH. ‘O'. 


FI II TTI TITIES OIRO IIS IIIA II IIIA SII AI IAAI ASSIS AAISISIASSISISISISSISSISIIACSOSOSC 


DATST?: oon 


#34061 ,DATA3 
#34070 ,DATA4 
PC ,DAOUT 


© Re eR ITT KKK EEE KE KKEKEKKEKEKKEKKKEKKEKEKE 


[THIS SUBTEST OUTPUTS 0.00 VOLTS TO CH. '1' 


ROCIO CIO CIRCUIT AIA AA IIIA IA IIA ISAS ISISIISISSISIISISISISSISII ISI SIS ISI ISS IIIS SSM. 
DATS10: ae 
MOV #30062 ,DATA3 


#30060 ,DATA4 
PC ,.DAOUT 
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1874 

1875 AOR IR IIIT ROTOR TOR TTT TAIT AS SAAS SASSIISISIASIAS SIS SASS ISSSASSIN 
1876 THIS SUBTEST OUTPUTS 1.11 VOLTS TO CH ‘1°. 

1877 FIR R ICICI ICICI IORI ITI IAAI AAS SIS ASISSSIISSSISISISSISISSAISSASSSISISSSISISSS. 
1878 

1879 007456 104001 DATS11: SCOPE 

1880 007460 000011 11 

1881 007462 012737 030462 007776 MOV #30462 ,DATAS 

1882 007470 012737 030461 010000 MOV #30461 ,DATA4 

1883 007476 004737 007746 JSR PC ,DAOUT 

1884 007502 104012 PRINT 

1885 7504 026462 MES51 

1886 007506 026522 MES53 

Ly = 24 007510 104 TTYIN 

1889 II RII IOI OICIOICIOIIIOIOIOIOIOITICIEROIIOIIOI ITT TT TT TTT ASIII AAAS SISASISISISASSSSSISSAN 
1890 THIS SUBTEST OUTPUTS 2.22 VOLTS TO CH. ‘1’. 

1891 FIR ICICI ICICI ICICI IIIT AI AAAASISIASSSISSSSSISSSS ISIS SIA IASSSASISASSS 
1892 

1893 007512 104001 DATS12: SCOPE 

1894 007514 000012 12 

1895 007516 012737 031062 007776 MOV #31062 ,DATA3 

1896 007524 012737 031062 010000 MOV #31062 ,DATA4 

1897 007532 004737 007746 JSR PC ,DAQUT 

1898 007536 104012 PRINT 

1899 007540 0264 MES51 

1900 007542 026530 MES54 

1901 007544 104 TTYIN 

1902 DISS AIOIEIIIOIUIDIIIIIIIOIIIUIOIUINIDISIIIIOIOIOIIUIDIOIDIOIUIIIDIOIOIUIDIDIDIDIDIUIDIDISIDITITIOIDI DI ITT TTT TT 
1903 THIS SUBTEST OUTPUTS 4.44 VOLTS TO CH. ‘1°. 

1904 AOI III IIEIIOIOIDISIIOIUIOIDIIIUIOIDISISIOIUIOIIUIUIOISIOIUIOIUIOIUIDIDIUIDIDIDIDIOIUIOIDIOI IIT TTT TOTTI TTT 
1905 

1906 007546 104001 DATS13: SCOPE 

1907 007550 13 

1908 007552 012737 032062 007776 MOV #32062 ,DATAS 

1909 007560 012737 032064 010000 MOV #32064 ,DATA4S 

1910 007566 004737 007746 JSR PC ,DAOUT 

1911 007572 104012 PRINT 

1912 007574 026462 MESS1 

1913 007576 026536 MESS5 

1914 7 104013 TTYIN 

1915 BUSI IIIS IOIIIOIDIIIIOIDIDIDIDIUIIIOIIIOUIUIOIOIIOIUIIOIUIOIDIOIIOIUIDIDIOIUIDIOIIUIUIOIDIOIOIDIUIOIIOI SIDI 
1916 ;THIS SUBTEST OUTPUTS 8.88 VOLTS TO CH. ‘1'. 

1917 IDOI IIOIUIAIIUIUIDIIIOIUIOIDISIDIIIOIOIIOIIUIUIOIIUIUIUICIUIUIOIDIOIOIUISIOIOIDIUIDIDIDIDIIDIDIDIDOIIDIDIDEI SITIO: 
1918 

1919 007602 104001 DATS14: SCOPE 

1920 007604 000014 it 

1921 007606 012737 034062 007776 MOV #34062 ,DATAS 

1922 007614 012737 034070 010000 MOV #34070 ,DATA4 

1923 007622 004737 007746 JSR PC ,DAOUT 

1924 007626 104012 PRINT 

1925 007630 0264 MES51 

1926 007632 026544 MES56 


1927 007634 104013 TTYIN 
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IOI ICICI ISIC IIOIOIOISIE: ROISIEIOIIOITIOIOIIOIIOIIOIOIOIOI TIO TTT ATTA IAS SASSSASSSASAI A. 
[THIS SUBTEST OUTPUTS 0.00 VOLTS TO CH. '0' & 9.5 VOLTS TO CH. ‘1" AND 

; THEN THIS SUBTEST RUNS IN A CONTINOUS LOOP UNTIL EITHER 

:**R" IS TYPED TO RESTART THE TEST OR "“C' IS TYPED TO 

;RETURN TO THE MONITOR 


FI III IIT IT ITT TTT ITSO IOS ICSI SIR ITSO SOI IO ISAS SSIS SSIS NSS SANS SSSI SA 


DATS15: 7 
032144 L DLYSWH ENABLE TRANSFMITTER DELAY 


M 
030063 DATI5A: #30063 ,DATA3 sMODE *3" CH. ‘0° 
030060 MO #30060,DATA4 
032471 #32471 ,DATAS cH, 
002060 010004 #2060 ,DATA6 [SEND 'EOT’ WITH 'LSB' 
007746 PC ,DAOUT 


012737 034463 007776 #34463 ,DATAS sMODE ‘3° CH. ‘0° 
012737 010000 #30065 ,DATA4 

012737 010002 #30060 ,DATAS sth. “F" 

012737 010004 #2060, DATA6 :SEND 'EOT' WITH "LSB" 
004737 007746 PC ,DAOUT 

000743 BR DAT15A 

000000 


J II II III IIIT II II TO IO TK III IIT ITO TOOT TOIT TOSS OSS IOI TOIT IIIS IN 


3M7384 ADDRESS TEST COMPLETE 


FI II IIIT ITT III III I IT ITT IIIT III II III IOI III I III III III III IIT II III I SII AIAN 


= te te Re te IKK KKK KEKE KEK KEKE EKEEEEKKKEEEKEKEKKEKKKKE 


[ROUTINE TO OUTPUT A PRE-LOAD DATA VALUE TO THE D/A CONVERTER. 


FI I IIIT III ITI SOTTO TOT TORII IIS III IIIT IIIT IOI OITA SI IISA IAI IAAI I ANSI NSIS ISIS IN 


122737 000063 007776 DAOUT: 3? weit eo BOTH CH.'S? 


000004 010002 #EOT ,DATAS NO. TERMINATE AFTER ‘3° CHAR.'S 
017234 PC ,ADRDST TADDRESS THE MODULE 


; TRANSMIT THE DATA 
PC 
;LOW BYTE=MODE, HI BYTE=MSB 


;HI BYTE=LSB 
;LO BYTE="EOT" OR ‘MSB' OF CH. ‘2" 
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CZPMAC .P11 19=JAN=78 14:50 M7384 D/A ADDRESSING TEST SEQ 0067 
1976 
1977 4 [ERA RRERREEKEEEEEREEE EK RIKER 
1978 “SBITL M7384 D/A EXERCISER TEST 
1979 ;THIS TEST ENABLES ANY VALUE THE USER TYPES IN ON THE TELEPRINTER TO BE 
1980 ZOUTPUTTED FROM THE D/A. WHEN SELECTED, THE TEST REQUESTS FOR TWO THREE DIGIT VALUES 
1981 ; (SEPARATED VIA COMMA'S) TO BE TYPED IN. THE FIRST VALUE IS THE ONLY ONE 
1982 SOUTPUTTED WHEN RUNNING ONLY ONE CHANNEL. IF BOTH CHANNELS ARE SELECTED 
1983 THE FIRST VALUE WILL BE OUTPUTTED ON CHANNEL '0' (X DAC) AND THE 
1984 [SECOND VALUE WILL BE OUTPUTTED ON CHANNEL ‘1° (Y DAC). THE CHANNELS 
1985 TARE SELECTED BY DATA SWITCHES "0 & 1° AND MAY BE SET AND RESET 
1986 sAT ANYTIME. SETTING DATA SWITCH ‘O° WILL SELECTED CHANNEL 'O'. SETTING 
1987 DATA SWITCH ‘1° WILL SELECT CHANNEL 1 AND SETTING BOTH 'O & 1° WILL 
1988 [ENABLE BOTH CHANNELS. 
1989 JI I I III II IOI ETE FICCI ITI I ICICI IIIT TIT IIIS IOI SOS IIIS IASI ISIS ISS SSI SSIS NA 
1990 
1991 010006 104012 M7384E: PRINT 
1992 010010 026552 MES57 3D/A EXERCISER TEST 
1993 010012 104026 ADDRESS ;GET AND SETUP MODULE ADDRESS 
1994 010014 104035 SETUP ;SET UP TEST PARAMETERS 
1995 010016 104012 TAGSF: PRINT 
1996 010020 026576 MES58 REQUEST THE D/A VALUES 
1997 010022 104013 TTYIN GET ‘EM 
1998 010024 022737 000007 032214 CMP #7 ,CHRCNT WERE '7*° CHARACTERS INPUTTED? 
1999 010032 001371 BNE TAG4F NO, ASK ‘EM AGAIN 
2000 010034 012701 015330 MOV #INBUF ,R1 :SET UP TO SAVE THEM 
2001 010040 012702 007777 MOV #DATA3+1 ,R2 
2002 010044 112122 MOVB (R1)+, (R2)+ SAVE 'MSB" OF CH. ‘0’ 
2003 010046 112122 MOVB (R1)+,(R2)+ 
2004 010050 112122 MOVB (R1)+,(R2)+ ;SAVE_ ‘LSB’ 
2005 010052 122721 000054 CMPB #54, (R1)+ ;DIGIT BETTER BE THE COMMA 
2006 010056 001357 BNE TAGSF NO, ILLEGAL INPUT 
2007 010060 111103 MOVB (R1) ,R3 SAVE THE "MSB" OF 2ND WORD 
2008 010062 112122 MOVB (R1)+, (R2)+ 
2009 010064 112122 MOVB (R1)+,(R2)+ 
2010 010066 112122 MOVB (R1)+, (Ro)+ 
apt 010070 112722 000004 MOVB MEOT, (R2)+ ; TERMINATE WITH ‘EOT’ 
2013 010074 012701 007776 TAG4G: MOV #DATA3,R1 SET UP SAVE SWITCHES 
2014 010100 117711 171246 MOVB @SWR, (R1) 
2015 010104 142711 000310 BICB #310,(R1) ;CLR UNWANTED BITS 
2016 010110 152711 000060 BISB #60,(R1) ;MAKE NO. BCD 
2017 010114 110337 010002 MOVB R3,DATAS RESTORE ‘MSB* OF CH. 2 EACH TIME 
2018 010120 004737 007746 JSR PC ,a@A#DAOUT SEND THE DATA 


2019 010124 000763 BR TAG4G 


CZPMACO PDM70 agreed ye 
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010126 


010216 


010220 
010224 
010232 


010244 


19-JAN-78 1 


000240 
000240 
112737 
004737 
022712 


030724 


032222 


000060 
017220 
000004 


032132 


000002 
000061 
017220 
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017231 


017231 


M7384 D/A EXERCISER TEST 


-SBTTL M7385 (SERIAL) & M7388 (CHAR.) I/0 ADDRESS TEST 

SIAR OIRO IORI IOI RI TOT RAITT AAI SAIAISISISIASASIS ASAI ASSAIS ASSIS SAS SASS A 
; THIS TEST EXERCISES THE 'M7385" MODULE USING THE PDP=-11 VIA THE DL11 
z;AS THE DESTINATION INPUT AND THE SOURCE OUTPUT 


FIT IIICIOIOIIOI IIS IIIS IIS IAI SSIS SIAI SIS NIISSIISSISIS SIS SIAISASISIICSOASASSSIOSSSISSSSSSSSO 


M7385A: PRINT 

M 3; TEXT ‘M7385 MODULE TEST’. 

ADDRESS GET MODULE ADDRESS 
M385A1: MOVB RO,STADR7 

MOVB RO,STADR8 

MOVB RO,STADRO 

MOVB RO,STAD10 

CLR LOPSWH 

SETUP ;SET UP TEST PARAMETERS. 


FCCC IORI IO IORI SAI AI IIIA IISSISSSS SSIS SIS AIS IAIAIS ISIS SAIS ASSIS SSISASSASAS MS 
THIS SUBTEST ADDRESSES THE ‘SOURCE’' PORTION OF THE MODULE USING 
z;MODE ‘'O' AND TESTS FOR THE FORCED RETURN OF THE ‘EOT’. 


Be IT IIIT IIT SOIC SOIT TOTO TIO IOI IIIT IOI OI OI OI IIIS SII IIA IASI AI II ISIS ISIS INS ISI SISA 


S17385: NOP 
NOP 


MOVB 4#60,SOH1 SET UP MODE ‘O° 

JSR PC ,ADRSRC ;ADDRESS THE MODULE 

CMP MEOT, (R2) :WAS IT RETURNED? 

BEQ -+6 sYES 

ay ;"EOT® WASN'T FORCED OUT BY SOURCE 
TST SIOSWH ;SERIAL INPUT 

BNE SD5 YES, GO TO TEST 'S. 


+ ee REE KEKE KE KEKE EEREKKEEKEKKERE 


[THIS SUBTEST ADDRESSES THE SOURCE IN MODE ‘1° AND CHECKS THAT THE 
;"EOT' ISN'T FORCED. 


FI RB TOI II I IK I KKK KIRKE REE E RE E EE R RE R 


SCOPE ,2 

MOVB #61,SOH1 ;SET UP MODE ‘1° 

JSR PC ,,ADRSRC ;ADDRESS MODULE 

TST (R2) ;WAS ANY DATA RETURNED? 

BEQ SD3 ;NO-OK 

—s ILLEGAL DATA TRANSFER VIA SOURCE 


SEQ 0068 


CZPMACO PDM70 2 aegei! yest 
19=JAN-78 1 
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010246 


4:50 


000003 
017234 


010272 


016234 


016220 


016234 
017670 


020372 
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PAGE 48 
M7385 (SERIAL) & M7388 (CHAR.) 1/0 ADDRESS TEST 


FAO IOI IORI ROCIO IOI III OIRO RIOR IIT II IAA SIAIAIIAISSIASISISS SSIS ASS SSSSSSSSSSA. 
SAT THIS POINT THE SOURCE MODULE IS ADDRESSED WAITING FOR DATA 

THIS SUBTEST ADDRESSES THE DESTINATION MODULE AND TRANSFERS DATA 

3TO THE SOURCE AND CHECKS THAT IT IS RETURNED. 


TRA OIEIEIEIOICISICIOI IOI IUIOIOICIEIEIEIEIR IIIT ITT TTT ITT TAIT AISI SISO SI IIII ASAI SIS SSS: 


SD3: re E,3 
PC ,ADRDST ADDRESS DESTINATION 
ws HAS ANY DATA RETURNED? 
.+ 


;NO, OK 
;NO DATA HAS YET BEEN TRANSFERED 
TAG1D+2 ;EXIT ON ERROR 


; CREATE A RANDOM DATA BUFFER 
#. ,RETURN ;RE-SET SCOPE LOOP — 
ENABLE DL 0°S RECVR 
; TRANSFER '500" WORDS TO SOURCE VIA DEST. 


RECBFO WAS ANY DATA RECV'D? 
-+10 YES, VERIFY IT 
:NO DATA WAS RECV'D BACK FROM SOURCE 


TAG1D+2 ;EXIT ON ERROR 
PARITY ;WAS PARITY ERROR DETECTED? 
-+6 ;NO, VERIFY DATA 

;DATA PARITY ERROR 


#RECBFO,R1 :SET UP TO COMPARE RECV'D DATA 
ATRNBFO,R2 sAGAINST TRANSMITTED DATA 
(R1)+,(R2)+ DATA MATCH? 
.+10 ;YES, CONTINUE 
;RECEIVED DATA DOESN'T MATCH TRANSMITTED DATA 


TAG1ID+2 
ATRNEND ,R2 ; DONE? 
CMP 1A :NO 
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FIERO ICI SIOIOISIOIOIOIOISIOIOIOIOIDIOI STOIC OORT IT TOIT TOOT OTT TTA ITAA ISAIASIASSIASSSSSSSSSS 
SAT THIS POINT DATA HAS BEEN TRANSFERED TO THE DESTINATION AND 

[RECEIVED BACK FROM THE SOURCE. THIS SUBTEST TRANSFERS AN ‘EOT' FOLLOWED 
:BY DATA TO VERIFY THAT THE ‘EOT' CLEARS THE SOURCE & DESTINATION. 


SI I BI IIIT ICSE ITO IOC IOI TOTTORI ICI IOS IS SSI SSS SSS SSSI SSSSISSIOSS SA 


104001 000004 SD4: SCOPE ,4 
104006 ; TRANSMIT "EOT’ 


000004 
010374 104007 sFOLLOW "EOT' WITH SOME DATA 


010376 010402 
010400 000402 


MmNnronanonoenononony 
ab ih ah at anh aad aah oh ais 
el ed cae ce ce eed ed eed 
OONAOUESWR— 


101 . ;SEND A COUPLE OF DATA CHAR.'S 


102 
000 ; TERMINATE 
010406 


005737 016224 : sWAS 'EOT' RECV'D? 
3 BN .+10 YES 
;"EOT’ WASN'T RETURNED 
TAGIF +2 ;EXIT ON ERROR 
000004 a Seni re "EOT' ONLY CHAR. RETURNED? 
Pi 


; ILLEGAL DATA TRANSFER 
030724 : ERRB 





on 
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PARRA ERREREREEEEKEKE PARAS SSSSASSLSSSSSESESES ESSE SESE RRS ERS ESSA RR RSD DODD 
[FIFO CHARACTER STORAGE TEST 

THIS SUBTEST “+ gia THE DESTINATION MODULE THEN TRANSMITTS 
;"63" AND AN ‘EOT'. THE SOURCE MODULE IS THEN ADDRESSED 

[AND IT SHOULD TRANSMIT THESE CHARACTERS BACK TO THE PDP-11. 

;1T SHOULE BE NOTED THAT WHEN THIS TEST IS RUN USING THE 

:SERIAL INPUT OPTION, ONE HUNDRED AND TWENTY-EIGHT (128) 
“CHARACTERS WILL BE RETURNED TO THE DL11 RECEIVER. THE FIRST 

:'64' CHARATERS ARE RECEIVED BACK FROM THE SERIAL INPUT 
DESTINATION, AND THE SECOND ‘64° CHARACTERS ARE THE CHARACTERS 
[THAT WERE ACUTALLY STORED IN THE ‘FIFO' OF THE MODULE UNDER TEST. 


TCR ICRC RII IOI IIIS RR AAAI TOSI ISIIISSI ISI ISIS SSASAISSIS IIIS SSSA AN 


104001 000005 SD5: SCOPE ,5 
000000 MOV #0, -(SP)  ;ENABLE INTERRUPTS 
010452 #1$, ~(SP) 


1$: ;CREATE A RANDOM DATA BUFFER 
000004 017767 MEOT, TRNBFO+77 =; TERMINATE ae ae AFTER ‘64° BYTES 
017770 TRNBF 0+100 TERMINATE BUFFER 
017234 PC,ADRDST ZADDRESS DESTINATION MODULE 


0400 TAGIH: ; TRANSMIT DATA 

017670 

112737 000060 017231 TAGIL: #60,S0H1 ;SET UP FOR MODE ‘0° 
37 017220 PC,ADRSRC ZADDRESS SOURCE 


016224 RECEOT Ps Nr ALL DATA BACK? 
010514 274 , WAIT FOR ‘EOT* 


010516 017670 : ATRNBFO,R1 ;TO TRANSMITTED DATA 
: (R1)+,(R2)+ :DATA MATCH? 


-+10 YES 
“RECV" D DATA NOT EQUAL TO TRANS. DATA 


SD6 EXIT ON ERROR 
017770 R1,4TRNBFO+100 ;DONE? 
CMP 1B iN 


BN 0 
032132 SIOSWH sUSING THE SERIAL 1/0 INPUT? 
SD6 ZNO, CHECK ONLY '64' CHAR.'S 
017771 TRNBF 0+101 iYES, HAVE WE CHK'D '128° CHAR.'S? 
SD10 YES, EXIT 
017771 = TRNBF 0+101 “NO, CHK NEXT '64° CHAR.'S FROM ‘FIFO' 
000002 016224 CMP #2,RECEOT RECEIVED ALL DATA FROM FIFO? 
“6 3NO, WAIT FOR ‘EOT' 
010572 CMP1C :DO IT. 





an 
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2187 010574 104001 000006 

000340 

2189 010604 012746 010612 
000002 

2191 010612 005737 032132 

2193 010620 004737 005154 


2200 010624 104001 000007 


010643 061 
2210 010644 023 
2211 010645 3 


2216 010652 Sh 000003 


2220 010664 3 
2221 
2222 0 105722 
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RE REE REAR 


[THIS SUBTEST ADDRESSES THE ‘SOURCE’ USING THE WRONG MODULE ADDRESSES 
;AND TESTS THAT THE SOURCE ISN*T ENABLED. 


FIO IO TOIOIOIOIIOIOIOTOIOIIOIOIOIOTOIOIOIUSOICIOIOICIOIOIOIOIOIOIOIO IOI SSAA ASI NISASSISSSSSSASSIS SSIS 


SD6: SCOPE ,6 
MOV #340, <-(SP) ;INHIBIT INTERRUPTS 


wT #1$, -(SP) 

1$: TST SIOSWH ;USING SERIAL INPUT OPTION? 
BNE SD10 :YES, SKIP THE NEXT TEST. 
JSR PC,@4ADRSIT 


ICR RIOR ICICI ORI TORII IOSD ASIII AI IAS IAS AIA ISA IAAI SSA SSAA IAA 
THIS SUBTEST CHECKS THAT ‘ETX' WILL CLEAR THE SOURCE AND THAT ‘STX" 
zWILL CLEAR THE DESTINATION 


J RI ERIK TREE RE RRR 


SD7: SCOPE ,7 


a ;ADDRESS MODULE 
.+ 
BR TAGIK 
-BYTE 0DC1 ALERT SOURCE 
STADR7: .BYTE 61 
-BYTE SOH 
-BYTE 61 MODE ‘1’ 
-BYTE DC2 ALERT DESTINATION 
STADR8: .BYTE 61 
-BYTE DC3 ENABLE MODULE 
-~BYTE ETX ;CLR SOURCE 
TAGIK: oo ;SEND A DATA CHAR. 
CMPB METX,(R2)+ sWAS "ETX" RETURNED? 
BEQ -+10 7 YES 
MOCERR 7 'ETX" WASN'T RETURNED 
ERR16 
TAG1W ;EXIT ON ERROR 
TSTB (R2)+ WAS ANY OTHER DATA RECV'D? 
BEQ -+10 :NO-OK 
MODERR 7ETX DIDN'T CLR SOURCE 
ERR14 
R TAG1W ;EXIT ON ERROR 


Ci 
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NOW CLR DESTINATION 


;CLR DESTINATION 
;SEND SOME DATA 


010711 000 x : TERMINATE 

:NOW RE-ADDRESS SOURCE & DESTINATION AND EXAMINE DATA 
010712 TAG1S: RECVRO 
010714 104007 L :RE-ADDRESS SOURCE 
010716 “+6 
010720 


010722 B ;ALERT SOURCE 
STADR9: . 1 


;MOD 
sALERT DESTINATION 
ENABLE MODULE 


.B 
STAD10: . 
B 


010731 
010732 016226 TAGIT: RECSTX 3WAS 'STX* RETURNED? 

3 BN -+10 :YES 

:'STX* WASN'T RECV'D FROM DEST. 
010744 000405 TAG1W EXIT ON ERROR 
010746 016236 ee zWAS "STX' THE ONLY DATA RECV'D 
010752 2 7 YES 
010754 z'STX" DIDN'T CLR DEST. 
010756 031073 
;SEND AN ‘EOT* TO CLR MODULE 


010760 104006 TAGIW: LDCHRO 
010762 000004 EOT CLR MODULE 
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PIO I TORII IORI IOIOIIOI IIIT TI TORII TTI IAAIAISASISSS ASS IAS SSSA SSSA SS 
:THIS SUBTEST REQUESTS THE OPERATOR TO RE-SET THE MODULE ADDRESS TO ‘17°. 
:AND INSERT THE STRAP TO INHIBIT THE "EOT’ FROM BEING TRANSMITTED. 

IF DATA *SwW10° IS NOT SET THIS MANUAL INTERVENTION TEST IS SKIPPED. 


SII ITI TTI RR IRI RRR ERR ERE ERERER ERE EERE ES 


SD10: SCOPE,10 
170354 BIT pen @SWR 3SW10 SET? 
BEQ TAGIP NO, TYPE TEST COMPLETE 


iTEXT "RE-SET MODULE ADDRESS TO '17'. 
:WAIT FOR 'CR* TO CONTINUE 


011010 020774 : #. ,RETURN ;RE-SET SCOPE LOOP ADDRESS POINTER 
000077 #77 ,MODADR SET UP FOR ADDR. ‘17° 
000077 #77,SRCADR 
000077 017277 MO #77 ,DSTADR 
ENABLE DL 0°S RECVR. 
017234 JSR PC,ADRDST ADDRESS DEST. MODULE 


;SEND SOME DATA 


;SEND DATA 
7 TERMINATE 
3 :CLR & RESET BUFFER 
000060 017231 #60,S0H1 ;SET UP FOR MODE ‘O' 
017220 PC,ADRSRC ‘ADDRESS THE SOURCE 
041101 : set aera ey THE ‘A & B" RETURNED? 
®t s¥ 
sMODULE WASN'T ADDRESS W/ ‘17° 


BR SD EXIT ON ERROR 
016224 zWAS ‘EOT' STRAPPED OUT? 


ZYES 
;'EOT* WASN'T STRAPPED OUT 


FREER EERE EERE REE EERE RARE REE REE RARE ERE ERE REAR ER EEE 


TEST COMPLETE 


FI III TIT IT IT IRE RRR ERR EERE RE REE ERE ER ERE 


000011 SD11: + eG 211 


; TEXT "REMOVE STAP' 
;SET UP NEW MODULE ADDRESS 
TAGIP: 


MES ;TEXT ‘TEST COMPLETE* 
032134 MODADR ,RO 
000137 010134 M385A1 RESTART TEST 


Qoooo00oe 
ook aod cod od ond od ed ed 





CZPMACO PDM70 f agrrre! TEST 
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oh oh ob ad oh ld ee 
NNO anv 


; 
1 
1 
1 
1 
1 
1 
1 


011250 
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104012 


000412 
012701 


011206 020774 


016220 


017670 


MACY11 30A(1052) 


K 
20-JAN-78 09:11 PAGE 54 
M7385 (SERIAL) & M7388 (CHAR.) 1/0 ADDRESS TEST 


SEQ 0075 


JIC IOI IOI IUIOIIOIOIIOIOIOIE ROIDIOIOIIOI ITO TOIT TORT TTT TTT IASI IAISIASSIASSASSSSSSASSSSA. 
“SBITL M7385 SERIAL I/O INTERFACE TEST 

;THIS TEST IS USED TO TEST THAT THE SERIAL I/0 INTERFACE MODULE IS FUNCTIONING 
SCORRECTLY. TO RUN THIS TEST THE 'L' JUMPER MUST BE INSERTED ON THE M7385 


:SO AS TO BE INITIALIZED ON POWER UP. 


:TIE THE ‘T&R’ BUSES TOGETHER. 


REMOVE THE CONTROL MODULE AND 


I II IIE FICO T IOIOIIOSOT TOTO IORI KIO IIIS III III SII AISA SISIISISISISISISASAISISISSSISSSSSSASOSOSC 


M73851: 
ME S66 


TEXT ‘M7385 SERIAL INTERFACE TEST 


Pelehelahahahelehahehahalelehalehehelalehahehsialaiahsislalaheheleiehsieielsleleiaheieleiaiaielsielelaieisielsielaielelelaielieieieleleleieicleiehel 


THIS TEST SIMPLY ADDRESSES THE DESTINATION PORTION OF THE MODULE WHICH 
;WILL ENABLE A CLOSED LOOP FOR DATA BEING SENT TO THE SOURCE. 


FB BRI TIT IO TOIT TOTO TOTO SOTTO IOI IOI OI OS AOS IAAI IAAI I IIIS AAAI ASSIS SSIS SSI SSN 


TESTI: 


IADR10: . 
B 


(R2) 
.-+10 


TEST2 


#. ,RETURN 


(R2) 
.+10 


TEST2 
PARITY 
.+10 


TEST2 
ATRNBFO,R1 


; CREATE A RANDOM DATA BUFFER. 
ADDRESS DESTINATION 


;ALERT THE DESTINATION 

sMODIFIED BY USER 

;ENABLE DESTINATION 

; TERMINATE 

sHAS ANY DATA RETURNED? 

iNO, OK 

:NO DATA HAS YET BEEN TRANSFERED 
sEXIT ON ERROR 


;CREATE A RANDOM DATA BUFFER 


sRE-SET SCOPE ys ne 
;ENABLE DL O'S 
; TRANSFER *500' ROORDS TO SOURCE VIA DEST. 


zWAS ANY DATA RECV'D? 
7YES, VERIFY IT 
NO DATA WAS RECV'D BACK FROM SOURCE 


EXIT ON ERROR 

[WAS PARITY wr DETECTED? 
:NO, VERIFY DATA 

[DATA PARITY ERROR 


AGAINST TRANSMITTED DATA 
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011254 022122 CMPT1A: CMP (R1)+,(R2)+ iDATA Cont Ik 
1403 BEQ .+10 7YES, CONTINUE 
RECEIVED DATA DOESN'T MATCH TRANSMITTED DATA 


TEST2 
020372 ATRNEND ,R1 ; DONE? 
001370 CMPT1A 3NO 


tet tala Soin? BATA bad UE tametrines 16 tie SetiiMtiae 


SAT THIS POINT DATA HAS BEEN TRANSFERED TO THE DESTINATION AN 
RECEIVED BACK FROM THE SOURCE. THIS SUBTEST TRANSFERS AN FOr" FOLLOWED 
BY DATA TO VERIFY THAT THE 'EOT' CLEARS THE SOURCE & DESTINATION 


Pereveverrrererrrcreerirerertretiteteercitttttttttirttett tect tet ttt titi tt: 
TEST2: SCOPE 
c ; TRANSMIT ‘EOT’ 
sFOLLOW ‘EOT® WITH SOME DATA 


SEND A COUPLE OF DATA CHAR.'S 
; TERMINATE 


011316 
44424 016224 : et : WAS "EOT' RECV'D? 
.+ 


YES 

:"EOT* WASN'T RETURNED 
TST2Bt2 EXIT ON ERROR 
o> th hee —_ "EOT' ONLY CHAR. RETURNED? 
.+ 


‘TLLEGAL DATA TRANSFER 
TST2B: 


MASSE £22 222222 SESSESESESES SLES ESSE SES SERRE RASA RAR RRR S ASRS ASAE ASSESS SSDS! 


*TEST COMPLETE 


DIK III IIIT IIIT TOTO ITT TOT ITO TOTTI TIO TOT TOIT TTT TST TIT TOTTI TOT IO TTT ER 


TEST3: eos 


PRINT 
024236 MES7 TEXT ‘TEST COMPLETE 
011354 000137 001376 JMP MONITR ;RETURN TO MONITOR 
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011447 


011450 
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012746 


011441 
011445 


000340 
011412 


000000 
011426 
032146 


032146 


032132 
0114774 


000004 
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M7385 SERIAL I/O INTERFACE TEST 


© He ee eee ie eR Te ee eH TTT TH ICT III TTI TTI ITT IT TT IK RHEE RK 


"SBTTL M7385 TTL I/O TEST 


FI III III ISO ICSI TOSI TOI AS II III ISI SII ISI SISIISAIIS SAS ISIS SISISISISISSISISSSSSISISISS SASS 


M7385T: PRINT 
MES62 sTEXT "TTL I/O TEST* 
ADDRESS ;GE1T THE MODULE ADDRESS 
MOVB RO,TTLAD1 3SET UP MODULE ADDRESS 
MOVB RO, TTLAD2 
SETUP 


FI II IIIT II IIR II TT IIIT ITI OTITIS ITI III II IA IIA IIIS IAI II ISAS SSIS 
THIS TEST VERIFIES THAT THE TTL 1/0 SECTION OF THE SERIAL I/0 MODULE 

71S FUNCTIONING CORRECTLY. IT REQUIRES FOR A TELEPRINTER TO BE CABLED TO 
THE MATON LOCK OF THE SERIAL I/0 (THIS COULD BE THE CONSOLE PRINTER ONCE 
STHE TEST IS SELECTED). ALL CHARACTERS THEN INPUTTED WILL BE RECEIVED BY 
;THE SERIAL SOURCE AND WRAPPED AROUND (BY THE CONTROL MODULE OR 

COMPUTER IF DF11 IS USED) TO THE DESTINATION. HERE THE CHARACTER WILL BE 
: TRANSMITTED BACK TO THE TELEPRINTER AND PRINTED. EFFECTIVELY, AS FAR AS 
; THE USER IS CONCERNED, THIS TEST ACTS LIKE A KEYBOARD ECHO TEST. 


FI II II ITI III III I TTT SH III IE IIT III IKK HIRT RR 


TTLTST: MOV #340, <-(SP) ;INHIBIT INTERRUPTS 
MOV #1$, -(SP) 


TI 
1$: ENABLE DL11 RECVR. 
MOV #0, -(SP)  ;ENABLE INTERRUPTS 
#2$, -(SP) 


2$: 


sADDRESS THE MODULE 


TTLAD1: . sADDRESS MODIFIED BY _ 
. [MODE 1, WAIT FOR DAT 


. sALERT DEST. 
TTLAD2: . 6 ADDRESS MODIFIED BY USER 


DATA READY? 
;NO 


SUSING SERIAL 1/0 
‘YES, TEST ONLY FOR EOT 
(R2), TAG7B ‘NO, SET UP TO TRANSMIT CHAR. 


#EOT, (R2)+ CHAR. = ‘EOT'? 
TILTST :YES, RE-ADDRESS MODULE 
TAG7A :NO, WAIT FOR NEXT CHAR. 


SEQ 0077 
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lelelelelejlele) 
—_ 2) od od =) 
ee ed etd aed ad 
MVYEUSE 
ARORNMO 


011532 


011552 


011554 


19-JAN-78 14:50 


011623 
011625 


032144 


017220 
000004 


000340 
011574 


000000 
011606 


032146 


005037 032146 
105712 


M7385 TTL 1/0 TEST 


N 6 
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SEQ 0078 


© We We Be We i I IRIE KEKE EK EEE ER EKKEEEKEEEKEKK 


“SBTTL M7386 KEYBOARD/DISPLAY MODULE ADDRESS TEST 


BIT ITI ITT TOIT TOTTI ITO TOIT ICIS III IAI S ASIII NSISSSSSSSSSSSS SOAS 


M7386A: FrINT 
MES39 


Abo rESS 

MOVB RO,KEYAD1 

MOVB RO,KEYAD2 
KEYTO: SETUP 

CLR DLYSWH 


:GET THE MODULE ADDRESS 
‘SET UP TEST PARAMETERS 
SENABLE TRANSMITTER DELAY 


FIR I IIIT TITTIES AAAI AIS AAI ASAIN II SIS S SSSI SII 


[THIS SUBTEST ADDRESSES i.e MODULE AND CHECKS FOR THE 


SAUTOMATIC RETURN OF AN 


> 
FI II TIT III II IOI ICT TOT OTT TOTTI IOI III III AISI IASI II SSSI SS SS SSS 


KEYT1: 


PC ,ADRSRC 
#EOT, (R2) 


ADDRESS THE MODULE 
:WAS ‘EOT' RETURNED? 


7YES 
MODULE DIDN'T RETURN ‘EOT"’ 


[ICICI I ICICI RIOTS IIIT IIIT RII TTT IIIS SASSI SISSSSIS SASSI SS SSIS AS. 
THIS SUBTEST ADDRESSES BOTH THE KEYBOARD & THE DISPLAY. THE DATA 
FROM THE KEYBOARD IS DISPLAYED AND ALSO PRINTED OUT ON THF TELETYPE. 
THE TELETYPE OUTPUT CAN BE ELIMINATED BY SETTING DATA SW1>. 


FIRE RRR KERR ERE ERE EERE KEE EERE EKER EERE ERE EER KEK 


KEYT2: 
- (SP) 
- (SP) 


-(SP) 
-(SP) 


KEYAD1: 8 
KEYAD2: : 
B 


; INHIBIT TRANSMITTER DELAY 
: INHIBIT INTERRUPTS 


ENABLE INTERRUPTS 


ENABLE DL11 RECEIVER 
ADDRESS THE MODULE 


ALERT SOURCE 
sALERT DESTINATION 
ENABLE MODULE. 


;DATA READY? 
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011732 
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104001 
00000 


032132 
011654 


000004 


020000 167456 


015434 
000003 


000002 
032132 


011750 020774 
000040 012004 


017234 
000040 


012004 
000140 012004 


B 
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MOVB (R2) , TAG6B 


TAG6B: 0O 
CMPB #EOT, (R2) 


TA 
JSR PC,PDMSET 
TAGEC : aa MHETX, (R2) 


EQ KEYT 
CMPB HSTX, (R2)+ 
BNE TAG6A 
TST SIOSWH 
BEQ TAG6A 
PRINT 
MES73A 
TTYIN 
KEYT2+6 


7 
PAGE 58 
M7386 KEYBOARD/DISPLAY MODULE ADDRESS TEST 


3NO, WAIT 
: USING THE CONTROL MODULE? 
‘NO,SET UP TO SEND CHAR TO DISPLAY 


REC. “EOT’? 
SYES, RE-ADDRESS MODULE 
DATA 


ZGET 
INHIBIT PRINTOUT? 
;YES 


I 
;REC. AN ‘EXT’? 
sYES, Ponty DISPLAY TEST 
SREC. *STX 
:NO, RECADDRESS MODULE 
YES, USING SERIAL INPUT? 
NO, "STX* IS LEGAL 


TEXT "RE-INITIALiZE PDM70.' 
[WAIT FOR SETUP 
;RESTART TEST 


CRC II ISI IIIA IIA IIS IAI ISIS ISIISAISAIA SSA ISISI AI IAISSAAI IAS IA ISIASSSSI SAA. 
[THIS SUBTEST IS ENTERED UPON RECEIPT OF AN 'ETX' FROM THE KEYBOARD 

IN THE PREVIOUS SUBTEST. THIS TEST THEN ADDRESSES THE DISPLAY 

SAND DISPLAYS THE ENTIRE DISPLAY CHARACTER SET ONE CHARACTER 

zsAT A TIME. EACH CHARACTER IS DISPLAYED ACROSS THE ENTIRE SCREEN 


:FOR APPROIMATLY ONE SECOND. 


J IKKE REE EERE EERE REE REE EEE ERE REE ERE KH 


KEYT3: sete 


MOV #. ,RETURN 
MOV #40, TAG6D+2 
TAG6E: RECVRO 


JSR PC,ADRDST 

MOV #32. ,R2 
TAG6D: LDCHRO 

40 


DEC R2 
TAG6D 


INC TAG6D+2 
CMP #140, TAG6D+2 
TAG6E 


7 TEXT DISPLAY TEST" 
SWAIT FOR 'CR' 

; INHIBIT TRANSMITTER DELAY 

;RESET SCOPE LOOP POINTER 

START OFF WITH DISPLAYING SPACES. 
ENABLE DL11 RECVR. 

ADDRESS THE DESTINATION 

DISPLAY ‘32° CHAR./LINE 


;SEND "LF* TO CLEAR SCREEN 
sMODIFIED TO CHAR. BEING DISPLAYED. 
oe ae ety 32 CHAR. 'S? 

, LOAD NEXT CHAR. 


ives 
;CLEAR DESTINATION 
:DELAY SO USER CAN VIEW SCREEN 


;SETUP NEXT CHAR. 
DISPLAYED ALL CHAR'S.? 


. 
e e 


SEQ 0079 
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000137 


010132 


000060 017231 
017220 
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M7386 KEYBOARD/DISPLAY MODULE ADDRESS TEST 


[RRR PARR RASLSSALSELSS AS ASASS SESE SEARS ESAS RASA SASS D SES SD | 


; TEST COMPLETE 


JI I FI IETF TEI ICI TE TOTTI SE OSORIO IOS OI IIS SOSA ISAS SISI ISS SASI SSSI SSASSISSISSSNC 


KEYT4: ai 


PRINT 
MES7 ;TEXT ‘TEST COMPLETE" 
BR KEYTO 


29 ORICON IAIISSISASIISISSASI SIS IS IAS SIS ISA ISAS SSIS SAS SSSSSSS I. 
;SBTTL M7388 CHARACTER 1/0 MODULE ADDRESS (IN-HOUSE) TEST 

;THIS TEST USES THE SAME TEST AS THE SERIAL I/O THE 

TEST HEADER IS TYPED HERE AND THEN THE PROGRAM GOES TO THE 

;SERIAL I/O TESTS TO EXERCISE THE MODULE 

;THIS IS DESIGNATED AS AN IN-HOUSE TEST SINCE A SPECIAL 

[WRAP=A-ROUND MODULE IS REQUIRED TO RUN THE TEST. 


PR RR Rk kk Reka Re hehehehehe alee telah hehehehe hahehahehaheheheheheheheheheleheleleleheleleheieleleleheieleieisleleieieielelel 


M7388A: PRINT 
MES44 sTEXT "CHAR. I/O ADDRESS TEST’ 
ME S69 3 TEXT ‘‘C IN-HOUSE) 
JMP @AM7385A+4 


J II II III KKK KKK EEK KK EERE EKER EER ERE 
.SBTTL M7388F CHARACTER 1/0 MODULE ADDRESS (FIELD) TEST 

THIS TEST REQUIRES FOR THE FIELD SERVICE TESTER BE CONNECTED TO THE 

; INPUT /OUTPUT OF THE CHARACTER I/O MODULE. THE PROGRAM THEN SENDS 
SPECIFIC DATA AND THEN REQUESTS THE USER TO VERIFY (WITH HIS TESTER) THIS 
;DATA. THE PROGRAM ALSO REQUESTS THE USER TO INPUT DATA WHICH WILL 

7 IN TURN BE PRINTER ON THE CONSOLE DEVICE. 


J I III III III III IK IOI II KI III IIT IIIT III III III III III II SEIT TI I 


M7388F : PRINT 
MES44 ;TEXT ‘CHARACTER I/0 ADDRESS TEST‘ 

MES70 STENT “CF JEL”. 

ADDRESS ;GET THE MODULE ADDRESS 

SETUP SET UP TEST PARAMETERS 


JI I II IIIT II IK IK IT TTI III II III III IIIT III II SIFT TTT TTT IIH 


THIS SUBTEST ADDRESSES THE SOURCE IN MODE ‘O° AND CHECKS FOR A 
;FORCED ‘EOT’. 


[RCC ICICI IORI IIIA IAI IIA IASI IS ISIS SIS ISA IIIISIISI IIIA ISAS SSI AA IASI SA SAIS 
CHART1: NOP 
NOP 
#60,S0H1 SET UP MODE ‘0O' 
PC,ADRSRC : ADDRESS THE SOURCE 
#EOT, (R2) ey: *EOT* RETURNED? 


CHART2 sve 
;"EOT*’ WASN'T FORCED BY SOURCE 
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SIO OIRO ICICI SOISIEIOIII IIIT OTT TITAS AAIISAIIIASSAISIASSSSAASASSS MA. 
THIS SUBTEST ADDRESSES THE SOURCE IN MODE ‘1° AND CHECKS THAT THE 

;"EOT’ ISN'T FORCED. IT THEN REQUESTS THE USER TO INPUT DATA TO THE MODULE. 
;THE INPUTTED DATA WILL BE ECHOED TO THE PRINTER UNTIL AND ‘EOT' IS RECEIVED. 
THIS WILL ENABLE THE PROGRAM TO CONTINUE ON TO THE NEXT SUBTEST. 


FI I IIIT II IOI ICICI TTT TOIT IIT SITIO SITIOS IASI IISA IIS III IA. 


012124 104001 CHART2: SCOPE 
000002 2 
000061 017231 #61,SOH1 ;SET UP FOR MODE ‘1° 
017220 PC,ADRSRC sADDRESS THE SOURCE 
(R2) ;WAS ANY DATA RETURNED? 
.+10 ;NO-OK 
; ILLEGAL DATA TRANSFER 


BR TAG8A ;PRINT THE RECEIVED DATA 
021626 PC,TTYENB ENABLE INTERRUPTS 


3 TEXT “ECHO TEST’’ 
;TEXT’' INPUT DATA, TERMINATE TEST W/EOT"’ 
(R2) ;WAIT FOR DATA 


(RD) .R1 
015434 PC, PDMSET :PRINT IT 
000004 MEOT -(R2)+ “WAS "EOT' RECEIVED? 


001370 


FRR ICICI IOI IRIS IAI IIS I ASSIS ASI ASIII IIS SAISISISISISSIS ANI SSSAISISIS SSSA SAI 

THIS IS A ‘FIFO' STORAGE TEST. IT REQUESTS THE USER TO INPUT DATA (UP TO 63) 
CHARACTERS) AND AN ‘EOT'. AFTER THE USER HAS INPUTTED ALL HIS DATA, TYPE ‘CR’. 
THE TEST THEN ADDRESSES THE MODULE IN MODE ‘O' AND THEN PRINTS THE RECEIVED 
DATA WHICH WAS STORED IN THE SOURCE ‘FIFO’. 


FI III ITI III ITT TCT TOT I TTT IITA SNS NIA 


CHART3: —_ 


3 TEXT "'STORAGE TEST’’ 
zTEXT'' INPUT DATA & TERMINATE W/EOT"’ 
032150 f SENDSW ;SET UP TO RETURN ON TTY INTERRUPT 
021626 PC,TTYENB ENABLE INTERRUPTS 
;WAIT FOR RECVR. INTERRUPTS 
oe TTY INTERRUPTS RETURN .+2 
032150 C SENDSW 


000060 017231 #60,SOH1 SET UP FOR MODE ‘'0' 
017220 J PC ,ADRSRC ADDRESS THE MODULE 
012252 PRINT CONTENTS OF THE RECVR. BUFFER 





. F 
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FAO IO ICIS IEIOIOIIOIOIOIOIOIE. ROIEIOIOIIOI IOI IIIT ITT TTT AIT ITAIAASISASSS SSSA ISSA 
:THIS SUBTEST LOAD '16','4' CHARACTER DATA PATTERNS (TOTAL OF 64 CHAR.'S) 
ZINTO THE DESTINATION ‘FIFO’. THE USER IS THEN REQUESTED TO STROBE OUT 
STHESE '64' CHARACTERS AND VERIFY THEM. 

;THE ‘4° CHARACTER ge Hi! IS: ALL 1°S, ALL 0°S, ALTERNATE ""180'S'", AND 
[REVERSED ALTERNATE '1&0'S 


prevererrvrtreterrtrittttttitititiiititititiitiitiiitiiti iti ii tii tris) 


012254 CHART4: SCOPE 
000004 4 


000016 #16,R1 ;SET UP THE CHARACTER PATTERN 
017670 MO ATRNBFO ,R2 ;SAVE IT IN TRANSMITTER BUFFER 
000377 TAG88A: 4377, (R2)+ sALL 1°S 
000200 MO #200, (R2)+ ZALL 0°S 
000125 #125, (R2)+ ALTERNATE ‘180'S"* 
000252 #252, (R2)+ REVERSED ALTERNATE "180'S"' 

R1 LOAD 16" PATTERN'S? 

TAG88A ;NO 
000004 #EOT, (R2) [TERMINATE W/EOT 
012320 020774 #. ,RETURN ;RESET SCOPE LOOP POINTER 
017234 PC,ADRDST ADDRESS DESTINATION 

; TRANSMIT THE '64' CHARACTERS 


7 TEXT Bag *64° CHARACTERS 
[WAIT F "CR 


RRR ICR IORI IIIA IASI IIA IAISSSISAISI SSSI AISI SAI SIA IA IAI AIA IAI AISA IASI 
; THIS SUBTEST ADDRESSES THE ‘SOURCE’ USING ALL THE WRONG MODULE 
;ADDRESSES AND CHECKS THAT THE SOURCE ISN'T ENABLED. 


III IIIT ICICI ITT II SOIT ICT FITC II SOTO ICICI IOI FIO TOIT OTITIS TOIT OT III ITSO 


CHART5: SCOPE 
012346 5 
012350 004737 005154 JSR PC,ADRSIT ;D0 IT 
IRCCS IOS OIRO ORO III IIIS IS III III III IIIS IIS IAAI ISISAISASA ASA. 


‘TEST COMPLETE 


289 ISII SSIS IIIS ISASASIAIA III IIS IS IIIA IIIS IAI AIA ISI IAA. 
012354 104001 CHART6: SCOPE 
000006 6 
104012 PRINT 
024236 MES7 TEXT ‘TEST COMPLETE" 
000137 012072 JMP M7388F +10 


-SBTTL M7377A REMOTE SERIAL I/O TEST 





On 
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012370 


012444 


012450 
012454 
012462 


012466 
012470 
012474 
012476 
012500 
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013103 


013617 
032222 


000001 
000062 
017220 


000004 


®. 
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017231 


1 
M7377A REMOTE SERIAL I/O TEST SEQ 0083 


. 
© Se We ie We ie ie We ie ee He tee ie eR HH IIIT II I TTT TITER EERE 


°M7377A REMOTE SERIAL I/O TEST 


FI ICO SCIOTO ICSC IOI IOI ICIS OOS SIO IIS SOI SOI IIIA SII IISA ISIS IIS ISISISISISISSSSSSAS SSS 


= Be He HR i HI II I RK KEKE KKK KEKE ERKKKEEK 


STHIS TEST EXERCISES THE "M7377" MODULE USING THE PDP=11 VIA THE DL11 
AS THE DESTINATION INPUT AND THE SOURCE OUTPUT 


SAORI ORCC ICIOIC ICICI IIIT IORI IORI TTR TOT AISA IAISAISISISISIAISISISSSASISISSISSSSSS SA. 
M7377A: Aap | TEXT 'M7377A REMOTE SERIAL I/O TEST"’. 
ME 


[GET MODULE ADDRESS OF MODULE UNDER TEST 
M7377B: ak 


RO,STDR12 
RO,STDR13 
RO,STDR14 
RO,STDR15 


LOPSWH 


MO 
M377A1: 
CL 


= eH HH I KKK IKKE KEKE REKKEKEKEKKKEEKEEEKEKKK 


ZTHIS SUBTEST ADDRESSES THE ‘SOURCE’' PORTION OF THE MODULE USING 
;MODE ‘2° AND TESTS FOR THE FORCED RETURN OF THE ‘EOT’. 


PRR RR Rake leha lake hhh eke hatehahalehehetehehehehelelahelehelelelelelehelehaleleleleleleielelelelelaleleleleleleleieieidicleleieielel 


S17377: SCOPE,1 
MOVB #62,S0H1 SET UP MODE ‘2° 
JSR PC ,,ADRSRC ADDRESS THE MODULE 


MEOT, (R2) WAS IT RETURNED? 
SD4A sVES 
:'EOT' WASN'T FORCED OUT BY SOURCE 





an 
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012502 


012540 
012542 


012544 
0125 
012570 


012572 
012576 


012600 
012602 
012604 


012606 
012610 


104001 


012746 


104007 
017670 
112737 


120127 


009002 


000000 
012520 


000004 
017770 
017234 


000062 


017220 
016224 


017670 


017770 
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017767 


017231 


M7377A REMOTE SERIAL I/0 TEST 


SD4A:  SCOPE.2 

LRA RRA KR EERE EEE EERE EERE ERE EERE ERE 
[FIFO CHARACTER STORAGE TEST 

+ THIS SUBTEST uaa THE DESTINATION MODULE THEN TRANSMITTS 

"63" AND AN ‘EOT'. THE SOURCE MODULE IS THEN ADDRESSED 

AND IT SHOULD TRANSMIT THESE CHARACTERS BACK TO THE PDP-11. 

31T SHOULE BE NOTED THAT WHEN THIS TEST IS RUN USING THE 

[SERIAL INPUT OPTION, ONE HUNDRED AND TWENTY-EIGHT (128) 
CHARACTERS WILL BE RETURNED TO THe 9111 RECEIVER. THE FIRST 
>'64' CHARATERS ARE RECEIVED BACK FROM THE SERIAL INPUT 
;DESTINATION, AND THE SECOND ‘64° CHARACTERS ARE THE CHARACTERS 
[THAT WERE ACTUALLY STORED IN THE FIFO OF THE MODULE UNDER TESR. 


TR RRR II AISI IIIS SSSI SSI SIS I ISA SASA ASSIA I AAA AM 


NOTE: THE nee he OF THE RECEIVER BUFFER ARE: 

LOCATIONS 1-62 (1-75 BASE 8) ARE XMITTD/RCVD CHARACTERS. 

;LOC 63: XMITTED/RCVD EOT (76 BASE 8) 

sLOC 64: (77 BASE 8) 

;LOC 65: TERMINATE IF=1,INITIALLLY SET TO 0 (2ND BUFFER SWITCH) 


#0, -(SP) sENABLE INTERRUPTS 
#1$, (SP) 


;CREATE A RANDOM DATA BUFFER 
MEOT,TRNBFO+77 =; TERMINATE BUFFER AFTER °63' BYTES 
TRNBF 0+100 ; TERMINATE BUFFER 
PC ,ADRDST sADDRESS DESTINATION MODULE 

; TRANSMIT DATA 


#62,S0H1 SET UP FOR MODE ‘2° 
;WAIT FOR THE DATA 


PC ADRSRC :ADDRESS SOURCE 
RECEOT ‘RECEIVED ALL DATA BACK? 
alk “NO, WAIT FOR ‘EOT* 
:NOTE: HANGS HERE WAITING FOR EOT 
CP1C: MOV #TRNBFO.R1 :T0 TRANSMITTED DATA 
(PIB: (R1)+, (R2)* :DATA MATCH 
: *RECV'D DATA NOT EQUAL TO TRANS. 


S5B ;EXIT ON ERROR 
R1,4TRNBFO+100 ;DONE? 





an 
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012614 


032132 
017771 


017771 
000002 016224 


CP1B 
S1OSWH 


S5B 
TRNBF 0+101 
$5B 


TRNBF 0+101 
#2,RECEOT 


--6 
CP1C 


H 7 
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:NO 
;USING THE SERIAL 1/0 INPUT? 


NO, CHECK ONLY "63° CHAR.'S 
YES, HAVE WE CHK'D '128' CHAR.‘S? 
sYES, EXIT 


:NO, CHK NEXT '63' CHARACTERS FROM FIFO 
RECEIVED ALL DATA FROM FIFO? 


— FOR *EOT’ 


SEQ 0085 
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2843 012650 005737 032132 
2844 012654 0014 
2845 012656 000137 013644 


MACY11 gt ca 
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M7377A REMOTE SERIAL I/O TEST 


S5B: 


TST SIOSWH 
BEQ SD5A 
JMP TAGIPD 


SUSING SERIAL 1/0? (SYSTEM TEST)? 
YES, SKIP THE FOLLOWING TEST. 
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012662 
012664 


012666 
012670 
012674 
012702 


112737 
012746 


000003 
000062 017231 
000000 


M7377A REMOTE SERIAL i/O TEST 


PePPSSRSSALALLLELER SES MSS SESE S SESE RES RS SSSA ERR R RRR RRR ASRS A RRA R ERASERS OD! 


[THIS TEST CHECKS VARIABLE TERMINATORS BY REQUESTING 


THAT THE MODULE BE CHANGED TO MODE 2 AND CHECKING THAT 


3; THE VARIABLE TERMINATOR EVOKES 
7A TRANSFER. 


362 CHARACTERS +DEFINED VARIABLE TERMINATOR ARc XMITTED 


;TO THE MODULE. 


:THIS ADDRESSES THE DESTINATION MODULE THEN TRANSMITTS 

CHARACTERS FOLLOWED BY THE CUSTOMER SELECTED TERMINATOR. 
“THE SOURCE MODULE IS THEN ADDRESSED 
[AND IT SHOULD TRANSMIT THESE CHARACTERS BACK TO THE PDP-11. 
31T SHOULE BE NOTED THAT WHEN THIS TEST IS RUN USING THE 
[SERIAL INPUT OPTION, ONE HUNDRED AND TWENTY-EIGHT (128) 
ZCHARACTERS WILL BE RETURNED TO THE DL11 RECEIVER. THE FIRST 
>"64' CHARACTERS ARE RECEIVED BACK FROM THE SERIAL INPUT 
DESTINATION, AND THE SECOND ‘64° CHARACTERS ARE THE CHARACTERS 
THAT WERE ACTUALLY STORED IN THE ‘FIFO* OF THE MODULE UNDER TEST. 


USTITTITITTI Tt TTTTti tet titt iti titi titi titi ii ii itt t titi itt t tte 
’ 


:THIS TEST CAN ONLY BE CHECKED IF WE ARE NOT USING THE SERIAL I/0 MODULE 
FROM THE PDP-11 TO THE PDM-70. 


: THE REMOTE SERIAL 1/0 MODULE HAS 4 MODES: 
‘MODE : FUNCTION: 


CLEAR ALL MODE FUNCTIONS 
: TIME-OUT MODE 
: VARIABLE TERMINATOR MODE 
: REMOTE POWER CLEAR 
: ENABLE ALL FUNCTIONS 


; IMPORTANT: NOTE THAT THIS SUBTEST WILL ‘HANG’' IF EOT IS NOT RETURNED 


NOTE THAT THE REMOTE SERIAL I/0 ALWAYS RESPONDS TO ‘EOT’ 
7IN ALL MODES, BUT ONLY RESPONDS TO VARIABLES IN MODE 2. 


SD5A: sees TEXT "SELECT 12 (LF) ON SWITCH V (CR)'. 
TTYIN ;WAIT FOR CR. 
SCOPE ,3 
MOVB #62,S0H1 


USE MODE 2 
MOV 40, -(SP)  ;ENABLE INTERRUPTS 


SEQ 0087 
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004737 


104007 
017670 


001775 
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14:50 
012714 


017766 
002012 017766 


017770 
017234 


017220 
016224 


017670 


017766 


032132 
017771 


017771 
000002 016224 
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M7377A REMOTE SERIAL 1/0 TEST 
#1$, -(SP) 


1$: 


MOV 
RTI 


RANDOM 
CLR 


MOV 


TRNBF 0+76 


#2012, TRNBFO+76 


67 
SEQ 0088 


;CREATE A RANDOM DATA BUFFER 
;CLR HIGH BYTE 
; VARIABLE TERMINATOR=LINEFEED. 
;EOT AFTER LF GETS STRAPPED OUT. 
O THE LOW 


: INT BYTE. 
;NOTE ce EOT WILL of RETURNED AFTER THE LINEFEED.. 


TAGIHA: 


TAGILA: 


JSR 


LDPGMO 
TRNBF 0 


JSR 
TST 
BEQ 


TRNBF 0+100 


PC,ADRDST 


PC ,ADRSRC 
ne 


; TERMINATE BUFFER 


ADDRESS DESTINATION MODULE 
; TRANSMIT DATA 


ADDRESS SOURCE 
RECEIVED ALL DATA BACK? 
3NO, WAIT FOR ‘EOT' 


zNOTE: HANGS HERE WAITNG FOR AN EOT.... 


;DATA PLUS AN EOT SHOULD BE RETURNED. 


3TO TRANSMITTED DATA 
DATA MATCH? 


SYES 
sRECV'D DATA NOT EQUAL TO TRANS. DATA 


SD6A EXIT ON ERROR 
R1,4TRNBFO+76 ;DONE? 


CMP1CA: 
CMP1BA: 


CMP1DA: 
:NOTE: DON'T TRY TO COMPARE THE 
BN CMP1BA 


SD6A: 


BR 
CMP 


A#TRNBFO,R1 


(R1)+,(R2)+ 


CMP1DA 


S1OSWH 
SD6A 
TRNBF0+101 
SD6B 


TRNBF 0+101 
#2,RECEOT 


-7~6 
CMP1CA 


*EOT’. 
iN 


0 

sUSING THE SERIAL 1/0 INPUT? 

:NO, CHECK ONLY "64" CHAR.*S 

:YES, HAVE WE CHK'D ‘128° CHAR.‘'S? 
YES, EXIT 


“NO, CHK NEXT °64° CHAR.'S FROM 'FIFO" 
RECEIVED ALL DATA FROM FIFO? 


ee te FOR ‘EOT’ 
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013142 


013144 105722 
001403 
104022 
031171 
013154 000436 


000004 
000340 
013054 
032132 


005154 


000005 


000003 


L .¢ 
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77A REMOTE SERIAL 1/0 TEST 


© He Te he Bee ie Re Be Be ie HH I IK KKK KEKE KERR EKER EK 


TTHIS SUBTEST ADDRESSES THE 'SOURCE' USING THE WRONG MODULE ADDRESSES 
zAND TESTS THAT THE SOURCE ISN'T ENABLED. 


FI II II II TOIT IOI IOI SOTO OST IA III SISA IA NIS AIS IIS IISA ISISIISIAISSISISSI ASI SIISISISI'SSASIWCSICSAC 


SD6B: 
#340, <-(SP) ; INHIBIT INTERRUPTS 
#1$, -(SP) 


1$: SIOSWH USING SERIAL INPUT OPTION? 
SD10A YES, SKIP THE NEXT TEST. 
PC ,@4ADRSIT 


FR III IIIT II IOS IIIT IOI TORTI SITIO OI OSI I IOI IIIA IIIS AAS ASIII ISAS SANC 
sTHIS SUBTEST CHECKS THAT ‘ETX" WILL CLEAR THE SOURCE AND THAT ‘STX’ 
sWILL CLEAR THE DESTINATION 
FI III III ITI TTT ICT TOTTI TTI T IOI TOTTI TOTO OTS SSI SSIS III III III IN. 
SDZA: 

;ADDRESS MODULE 


;ALERT DESTIN 
;SEND THE ETX TO CLEAR THE SOURCE. 


SEND THE ‘B'' AS DATA. 


; THIS EOT SHOULD CLEAR THE DESTINATION. 


ALERT SOURCE 
;ENABLE MODULE TO RECEIVE ANY DATA. 


ONLY ‘‘ETX’’ SHOULD BE RETURNED. 
wi cea sWAS "ETX* RETURNED? 
~" s¥ 

;"ETX" WASN'T RETURNED 
SD10A ZEXIT ON ERROR 
(R2)+ : WAS ANY OTHER DATA RECV'D? 
.+10 NO-OK 

*ETX DIDN'T CLR SOURCE 


SD10A EXIT ON ERROR 


SEQ 0089 
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;REMEMBER TO CLEAR THE ‘B' AND ‘EOT ‘ THAT ARE IN THE BUFFER. 
013156 10400 TAG1SA: aye 
;SEND THE 'B' & ‘EOT" OUT OF FIFO. 
STDRY: 
013166 
013167 
013170 STDR19: * 


;NOW RE-ENABLE THE DESTINATION. 


013175 ii 
;NOW RE-ADDRESS SOURCE & DESTINATION AND EXAMINE DATA 


013176 TAG1SB: RECVRO 
LDPGMO ;RE-ADDRESS SOURCE 


TAGITA 


° ALERT SOURCE 
STDR11: 


013211 


013212 4 016226 TAGITA: wet — "STX" RETURNED? 
e* e 
3 'STX' WASN'T RECV"D FROM DEST. 
013224 BR TAG1WA EXIT ON ERROR 
;SKIP OVER EOT HERE AND LOOK FOR AN ‘*x"', 


sta NO DATA SHOULD HAVE BEEN RETURNED, IT SHOULD BE 0. 
F NON-ZERO ,THEN WE HAVE AN ERROR. 


013226 105737 016236 TSTB RECBFO+2 WAS "STX' THE ONLY DATA RECV'D 
001402 BEQ -+6 7Y 
104022 MODERR z*STX" DIDN'T CLR DEST. 
031073 ERR12 


;SEND AN ‘EOT’ TO CLR MODULE 


105737 016240 TAGIWA: TSTB RE CBF 0+4 ;LOOK FOR THE ‘‘X’’ HERE.. 
001402 BEQ 10 SBRANCH IF NO ERRORS. 
104022 

013250 031073 
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M7377A REMOTE SERIAL 1/0 TEST 


SEQ 0091 


BHI IIR KI III KIKI KKK KEKE EEKEEKEKKKKKKK 


STHIS SUBTEST REQUESTS THE OPERATOR TO RE-SET THE MODULE ADDRESS TO ‘17°. 
:IF DATA 'SW10" IS NOT SET THIS MANUAL INTERVENTION TEST IS SKIPPED. 


SRI ICI TIT IIIT IOI IT ITI IOS AT II IASI SAIS SAS ASAIAS IS ASSIS SIS SISSISIASIASAS SS SSASSSSS SSE 


013252 104001 000006 SD10A: SCOPE.6 
0 BIT 


02000 166066 


013272 


013274 013274 020774 TAGIQA: 
013302 032134 

017227 

017277 


013326 017234 
013332 TAGIRA: 
0133 


-EVEN 
TAGIUA: RECVRO 


017220 JSR 
DELAY 
041101 TAG1ZA: CMP 
BEQ 
MODERR 
ERR11 


BR 
016224 TST 
013374 BNE 


013376 MODERR 
ERR15 
SD11A: PRINT 
ME S88 
032134 


017227 
017277 


rie E @aSWR 
TAG] 


#. ,RETURN 
#77 ,MODADR 
#77.SRCADR 
#77..DSTADR 


PC,ADRDST 


PC,ADRSRC 
#41101, (R2) 
.+10 


SD11A 
RECEOT 
-+6 


STDR7 ,MODADR 
STDR7,SRCADR 
STDR7,DSTADR 


7SW10 SET? 
sYES, TYPE TEST COMPLETE 


;TEXT "RE-SET MODULE ADDRESS TO '17'. 
WAIT FOR 'CR' TO CONTINUE 


;RE-SET SCOPE LOOP ADDRESS POINTER 
SET UP FOR ADDR. ‘17° 
ENABLE DL O'S RECVR. 
SADDRESS DEST. MODULE 


;SEND SOME DATA 


SEND DATA 

; TERMINATE 

;CLR & RESET BUFFER 

;FOR THE NEXT TEST. 

ADDRESS THE SOURCE 

to THE "A & B* RETURNED? 

SMODULE WASN'T ENABLED WITH ADDRESS ‘17° 


AS ON ERROR 
WAS ‘EOT' STRAPPED OUT? 


;"EOT* WAS STRAPPED OUT 
;TEXT "RESET MODULE ADDRESS<CR>" 
;RE-STUFF THE ORIGINAL ADDRESSES. 


DI IIIIOIIOIIOIIIIOIOIOIOIIOIOIOIOIOIIOIOIOIOIOI TORTURE RR REE 


; THIS SUBTEST CHECKS MODE 1 FOR TIMEOUT 


DOI IOIIIOIOIIIIOIIIIIIDIIIUIIOIICIIOIOIIOIOIOIIIOIOIOIIIOUIOIOIOIUIIUIOIOIOIDIUIOIUIOIIOIUIII IOI TOR tik 


104001 000007 SCOPE ,7 
104035 SETUP 


104012 PRINT TEXT SET CLOCK 3 ON CLOCK MODULE TO 100 MILLISEC 
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3114 013440 030152 ME S84 TEXT SET SWITCH 1 OF P TO ON. 
3115 013442 030236 MES85 
3116 013444 104013 TTYIN 
3117 013446 112737 000061 017231 MOVB #61,S0H1 SET UP MODE 1 
3118 013454 004737 017220 JSR PC,ADRSRC 
3119 013460 104007 LDPGMO NOW CHECK THE TIME-OUT CLEAR. 
3120 013462 013466 +4 
3121 013464 000403 TGIPA 
3122 013466 022 .BYTE 2 
3123 013467 061 STDR12: .BYTE 61 
3124 013470 023 -BYTE 0C3 
3125 013471 130 BYTE ' 
3126 013472 101 -BYTE ‘A 
3127 013473 004 BYTE €0T 
3128 
3129 
sit ADDRESS SOURCE USING MODE 3 
3132 
3133 
3134 ADDRESS NON-EXISTENT SOURCE (240=SPACE). 
sez :VIA THIS PROGRAM: DC1,240,DC3 
3137 013474 112737 000240 017227 TGIPA: MOVB #240,SRCADR SET SPACE=ADDRESS TO BE ADDRESSED. 
3138 013502 004737 017220 JSR PC ,ADRSRC ;ADDRESS THE SOURCE MODULE. 
3139 013506 012737 177763 032160 MOV #-15,COUNT 
ee 013514 104005 RECVRO 
si4¢ z:WAIT FOR APPROXIMATELY 15 SECONDS... 
3144 
aor 013516 004737 014472 JSR PC,CNTLOP 
147 013522 104007 LDPGMO 
3148 013524 013530 +4 
3149 013526 000402 BR TG1PB 
3150 013530 021 -BYTE DC1 
3151 013531 061 STDR13: .BYTE 61 
3152 013532 023 -BYTE DC3 
3153 013533 000 BYTE 0 
3154 013534 105722 TG1PB: TSTB (R2)+ SKIP OVER THE EOT. 
Sez 013536 105722 TSTB (R2)+ :LOOK AT THE BYTE. 
3157 013540 001403 BEQ TGIPC :0K,NO DATA RETURNED. 
3158 013542 104022 MODERR :CLEAR LEFT GARBAGE IN MODULE FIFO. 
ks 013544 031633 ERR24 
$0) NOW CHECK THE REMOTE CLEAR FUNCTION. 
3163 013546 10400 RECVRO 
3164 013550 112737 000064 017231 1TGIPC: MOVB #64 ,S0H1 LEAVE IN MODE 4. 
3165 013556 113737 013103 017227 MOVB STDR7,SRCADR 
so 013564 004737 017220 JSR PC ,ADRSRC sADDRESS THE SOURCE 
3168 DON'T DELAY THIS TIME. 
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013570 104007 RETURNS FIRST EOT 
013572 013576 
sALERT DESTINATION. 


B 
STDR14:. 


;SEND SOME DATA. 


;SEND ENQ TO DESTINATION. 
SENQ SHOULD CLEAR OUT THE DESTINATION. 


DELAYL 
TG1PE: aw 


8B 
STDR15: . z;ALERT THE SOURCE. 
;2ND EOT RETURNED HERE 


005722 9 :TwO EOT'S ARE EXPECTED BACK. 


005722 2) ;SKIP OVER THE EOT'S. 

005722 (R2)+ ;AND LOOK TO SEE IF ANY DATA WAS RETURNED. 
:1F DATA CAME BACK, THEN REMOTE CLEAR 
;DIDN'T WORK. 


001402 TG1PG REMOTE CLEARED WORKED ? 
104022 MODERR 
031557 ERR23 NO, IT DIDN'T 
[REMOTE CLEAR LEFT GARBAGE IN FIFO. 
000010 TG1PG: SCOPE,8. :YES, REMOTE CLEAR WORKED 
[CI IER ICI IOI ITO TOI IR SSR IIR III IAI IOS OI IOS IAS AA IAS IA SIA SAA IIA SIA I ISSA SIA SAIS 
ZTEST COMPLETE 


eerrrrt ttt t ti tititiiiittttiitititiititiiiiiiiiiiitiiii titi iii 


TAGIPC: ADDRESS ;SET UP NEW MODULE ADDRESS 
032134 TAGIPD: =r" MODADR , RO SRESET THE ADDRESS. 


024236 MES7 ;TEXT ‘TEST COMPLETE’ 
000137 012376 JMP M7377B RESTART TEST 
.SBTTL M7378A FOUNDATION MODULE TEST 
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He Re I HI KKK KEKE KEK EKER EKEEK 


“M7378 FOUNDATION MODULE TEST 


II III III I ICI FIT I IOTTOT ITICOOTICIOSOTOIOTO TOO IOS OIA IS SS IIIS I IIIS ISIS I SSS 


THIS TEST SETS THE SERIAL I/0 UP AS A SOURCE AND THE FOUNDATION 
; MODULE AS THE DESTINATION . A RANDOM(PSEUDO) BUFFER 

; IS CREATED AND TRANSMITTED FROM SERIAL I/O TO THE FOUNDATION 

; MODULE. THEN THE FOUNDATION MODULE IS ADDRESSED AS THE SOURCE 
; AND THE SERIAL 1/0 IS ADDRESSED AS THE DESTINATION. BECAUSE 

; OF THE ‘WRAP-AROUND’ CABLE, THE DATA IS RETURNED 

; FROM FOUNDATION MODULE TO SERIAL I/0. 


;IF THE SERIAL I/O IS BEING USED, A TOTAL GF i128 CHARACTERS 
RATHER THAN 64 CHARACTERS WILL BE RETURNED. 


THE TEST THEN CHECKS TO MAKE SURE THAT ADDRESS 17 
; WILL ALSO RETURN THE DATA. 


000000 FLAB7: .WORD 0 ; THIS LOC IS USED TO RESTORE 
; THE CONTENTS OF ADDRESS 
;WHEN LOOPING. 


000000 FOUNSW: .WORD 
104012 7378A: PRINT 
027572 ME S77 3 TEXT ‘FOUNDATION 
MODULE TEST"’. 
013662 FLO: CLR F OUNSW ;CLEAR OUT OUR SUBTEST SWITCH. 
FLOP: SETUP :GET THE MODULE ADDRESS. 
ADDRESS :PUT ADDRESS INTO RO. 


013660 MOVB RO,FLAB7 ;SAVE THE ADDRESS IN FLAB7. 


013660 FLOPB: MOVB FLAB7,RO 
;MODIFY THE FOUNDATION ADDRESS 
IN THE PDM-70 PROGRAMS. 
014660 JSR PC,FSTUF 


014046 MOVB IADRS9,IADR11 ;SET UP SER I/O ADDR. 
MOVB 
MOVB 
017202 014036 MOVB IADRS9, IADR13 


’ 
Ph RRR Rk h kek R ill e hehehehe hahahahahahaha hehehe hehehelelahahehelelelelelehelehsheiehahaleleleielsleielelelelelelelslelelclelel 


THIS SUBTEST XMITS A RANDOM BUFFER TO THE FOUNDATION MODULE. 


FI II IIT IK KI EK KK IIE KR KEREKEHRIE KEE ER EK 


“NOTE THAT FOUNSW=0 HERE. 


013744 4001 000001 SCOPE ,1 
013660 014042 MOVB FLAB7,FLAB1 ;MODIFY THE FOUNDATION ADDRESS IN PROG. 
000000 MOV #0, -(SP)  ;ENABLE INTERRUPTS 

013762 013770 MOV #1$, ~(SP) 
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1$: ;GENERATE RANDOM BUFFER 
000004 017767 #EOT, TRNBFO+77 =; TERMINATE AFTER 64 BYTES. 
017770 ¢ TRNBF 0+100 END OF BUFFER. 


112737 000060 017231 MO #60,SOH1 MODE X 
005737 032132 FO s ;USING THE SERIAL 1/0? 
BE NO, SO BRANCH TO NORMAL LOAD. 
sELSE USE PADDED PROGRAM. 


:XMIT THE DATA NEXT. 


FPROG: : 
IADR12: . 7 :SERIAL 1/0 SRC. 


IADR13: . 7 
FLAB2: . : FOUNDATION MODULE 


;ADDRESS FOUNDATION AS SRC. 
FLAB1: 


;ADDRESS THE SERIAL 1/0 AS DESTINATION. 
IADR11: . 


IADR14: . 


;FOUNDATION MODULE. 
7;AS DESTINATION 
014071 


014072 10400 

014074 0 MIT THE DATA. 

014076 032132 

014102 5 ; BRANCH IF USING SER I/0. 


0 BR FOUNDATION AS SOURCE. 
014112 FLABSA: .BY 
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071 
023 
000 


016224 


014132 


$5 tad 017670 


014150 


014152 020127 017770 
032132 
017771 


017771 
000002 016224 


014210 


FTST: apy 


7378A FOUNDATION MODULE T 


FLABS: .BYTE 71 


«BYTE 0C3 
-BYTE 0 
- EVEN 


DELAY AND CHECK TO MAKE SURE 7HAT AN EOT HAS BEEN RETURNED. 


sGIVE IT TIME TO RETURN. 
;LOOK FOR AN EOT. 

YES, EOT WAS RETURNED. 
>"EOT' NOT RETURNED. 


sNOW CHECK THE DATA IN THE RECEIVER AND TRANSMITER BUFFERS. 
;LOOK FOR MATCHES. 


FND1C: MOV ATRNBFO,R1 :XMITTED DATA. 
FND1B: CMPB (R1)+,(R2)+ at MATCH? 


BEQ FND1D YE 

MODERR ;ELSE ERROR 

ERR3 :XMITTED DATA NOT = RECVD DATA. 
BR . FOUND2 [NON-FATAL ERROR. 


NOW CHECK TO SEE IF WE SHOULD LOOK FOR 64 CHARACTERS OR 128 
; CHARACTERS. IF WE ARE USING THE SERIAL 1/0 WE WILL 
HAVE 128 CHARACTERS RETURNED (INCLUDIND TWO "EOTS"). 


NOTE THAT THE LOW BYTE OF TRNBFO+100 

SERVES AS A BUFFER TERMINATOR AND THAT THE 

HIGH BYTE SERVES AS A_SWITCH. IF THE HIGH BYTE IS SET, THEN 
;WE HAVE CHECKED ALL 128 CHARACTERS. 


FND1D: os R1,ATRNBFO+100 ;DONE? 


FND1B NOT DONE YET. 

SIOSWH ;USING THE SERIAL 1/0? 

FOUND2 NO, CK ONLY 64 CHARS 

TRNBF 0+101 + CHECKED 128 CHARS? 

FOUND2 , EXIT 

TRNBF0+101 NO, “CK NEXT 64 CHARS FROM FIFO. 
#2,RECEOT ZEOT RECVD YET 

“6 :NO, WAIT FOR it 

FND1C :GO CHECK THE DATA FROM FIFO. 


;1F THE *FOUNSW' IS SET , THEN WE ARE EXECUTING 
;THE ‘ADDRESS 17° SUBTEST AND WE SHOULD SKIP OVER THE 
FOLLOWING SECTION. SET MEANS=~1. 
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014212 005737 013662 FOUND2: TST F OUNSW ;LOOK AT THE SOFTWARE SWITCH. 
014216 003035 BGT FOUNDS IF SWITCH=+1, THEN 
;WE ARE IN SUBTEST 3. 
014220 100423 F OUND3 ;SW=-1 MEANS WE HAVE 
JUST FINISHED SUBTEST 2. 
ELSE FALL THROUGH TO SUBTEST 2. 
3 (SWITCH=0). 
014222 enct 032132 SIOSWH 
014226 F OUND6 
014230 
014232 000240 
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3398 COIR IOIOICIOIOIOIOIOIOIOIOIOIOIIIIIIOICIIIOIIIT TTI ISAS SASASAASASASISAASISISASASAAAASA SSS SAS AA ASA. 
3399 sTHIS SUBTEST USES ADDRESS '17" AND XMITS A RANDOM BUFFER. 

3400 UII IIOIOIOIOIOICIOIOIOIIIDISIOICIOIOIOIOIOIOIOIOIOIOIOI IOI ATTA AS ASAI A IAS SASAAS SAA SAAAA. 
3401 
sens ;NOTE: FOUNSW==-1 HERE. 
seas 014234 104001 000002 SCOPE ,2 p****eSUBTEST 2 
3406 014240 104012 PRINT 
3407 014242 024316 MES10 ; TEXT RESET MODULE ADDRESS TO ‘17°. 
3408 014244 104013 TTYIN sWAIT FOR CR 
014246 112700 000077 MOVB #77,R0 ;REPLACE THE FOUNDATION ADDRESS WITH 17. 
014252 004737 014660 JSR PC, FSTUF 
:SET THE SWITCH SO THAT WE WON'T ENTER THIS AGAIN. 
014256 012737 177777 013662 MOV #-1,FOUNSW 3-1 MEANS WE ARE IN THIS TEST. 
014264 000137 014014 JMP FOUNDL ;SEND 2 CHARACTERS AND 


CHECK TO MAKE SURE THAT ADDRESS 17 
sWILL RETURN THEM. 


EELERELELE 
CONAUESWNHO 
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014270 
014274 
014276 


014302 
014306 


005737 


032132 
013670 


000003 
005154 
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M7378A FOUNDATION MODULE TEST 


POSSESS SSESESSESSESE SELES EEE SSE ER REESE RSE R SRS RRR SRSA RRA SAS ARSE SARS S RSE SD 


:THIS SUBTEST USES THE WRONG ADDRESSES AND CHECK TO MAKE 
;SURE THAT THE MODULE IS NOT ENABLED. 


Ph Bota Rak at alahahahehalahehahahahahahelalahaiahalahehelsleleletaiehelelalahelelaliehaheheheleheieieieieleleleleleleiaiolelcieleicicieieieieielel 


FOUND3: TST 
BEQ 
JMP 


S1OSWH 
FND3A 
FLO 


;SKIP THIS SUBTEST IF WE ARE USING SERIAL I/0. 
3S10 NOT IN USE. 
;ELSE LOOP TO BEGINNING OF MODULE TEST. 


ADDRESS THE MODULE WITH ADDRESSES 0-16. 
zASSUME PRESENT ADDRESS SELECTED TO BE 17. 


FND3A: SCOPE,3 
JSR 


PC,ADRSIT 


j****SUBTEST 3 
sMULTIPLE 

ADDRESS TEST. 

3 (DESTINATION) 
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3438 Pia Rahalelehehehahehalaiahahalahalehahelahehahahahehahaieleielelaleleiehehalahehaheheliaheieieisisleieteieleleleieleielelaielelele! 
3439 : ROUTINC TO CHECK CUSTOMER DEFINED 
3440 : MODE FLIP FLOP (SUB-PROGRAM) . 

3441 CRE RRR RRRER ERE RRER RRR EERREEERERREREREREEERERERER EERE EE 
3442 014312 104001 000005 FOUNDS: SCOPE,5 yxeeeSUBTEST 5 

3443 014316 104012 PRINT 

3444 014320 027634 MES78 s TEXT 

3445 PUT SCOPE PROBE 

346 :ON PIN 78(CR). 

3448 014322 027670 MES79 :"USE “E TO EXIT 

een 014324 104013 TTYIN sWAIT FOR CR 

3451 014326 012737 014406 014404 MOV #F OUND6 ,EVECTOR 

3452 OUTPUT THE FOLLOWING PROGRAM. 

3453 THIS PROGRAM WILL LOOP ENDLESSLY 

3454 “UNTIL A '*E" IS INPUTTED VIA TTY 

3455 ‘THE APPROXIMATE SIGNAL TO BE SCOPED WILL 

x28 ‘BE 1 MILLISEC @ 9600 BAUD. 

3458 SW 14=SET TO SCOPE LOOP. 

ot Sw 11 =SET TO ITERATE. 

3461 014334 005737 032132 FNDS: TST SIOSWH USING THE SERIAL I/0? 
3462 014340 001013 BNE FND5B YES, SO USE PADDED PROGRAM. 
3463 sELSE, USE THE FOLLOWING: 
3464 

3465 

3466 LOAD THIS PROGRAM IF MODULE TEST 

3467 014342 104007 FNDSA: LDPGMO LOAD THE PROGRAM 

3468 014344 014350 +4 

3469 014346 000402 BR FNDSC GO HERE WHEN DONE 
3470 014350 022 -BYTE DC2 

3471 014357 077 FLAB6: .BYTE 77 FOUNDATION AS DESTIN. 
3472 014352 023 .BYTE DC3 

hey 014353 004 .BYTE €EOT SEND THE EOT 

3475 

3476 014354 104007 FNDSC: LDPGMO 

3477 014356 014362 .+4 

3478 014360 FNDSA 

3479 014362 021 .BYTE C 

3480 014363 077 FLAB4: .BYTE 77 

3481 014364 001 .BYTE  SOH 

3482 014365 023 BYTE DC3 

3483 014366 000 .BYTE 

3484 014370 .EVEN 

3485 

3486 USE THIS PROGRAM IF SYSTEM TEST 

3487 014370 104007 FND5B: LDPGMO LOAD THE FOLLOWING PROGRAM. 
oes : (SERIAL I/O IN USE). 
3490 014372 014030 FPROG 

3491 014374 104006 LDCHRO SEND AN EOT 


000004 EOT 
3493 014400 000137 014370 JMP FNDSB 
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3494 
3495 014404 000000 
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M7378A FOUNDATION MODULE TEST 


EVECTOR: 


-WORD 0 


ADDRESS TO GET ME OUT OF INFINITE LOOPS. 


SEQ 0101 
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Si cialele Reha heielehaleheleheleieheleieiehel ARS RRASASAASE SSSA SASASA SASS AR RSS A SASS DSSS Ds 


TEST COMPLETE 


A CSCS ROR ROR OSIRIS IIH IISA III IIIT IIIS ISIISIISISSISSS SSS SSSI AS. 


014406 104001 000006 FOUND6: SCOPE ,6 

014412 104012 PRINT 

014414 024236 MES7 TEXT "TEST COMPLETE’ 
014416 000137 013670 JMP FLO ;LOOP THE TEST. 


-SBTTL SUBROUTINES 





CZPMACO_PDM70 F egrerpe NE jest 
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014422 104007 
014430 
soca 

130 


004 
014433 000 


014470 
014470 000207 


M 8 
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TOSSES SSESESSLESESSS SELES SESS SSE SSSR RSE R RSA E ASRS ASRS SAAS S RSS 


SUBROUTINE SENDAX 


:AAAAAANNERRAAAAAAANNAAERERAAAAASSAASERERAAEAAAAERARAAAEE OARS 
SUBROUTINE TO LOAD AND SEND THE CHARACTERS 
: —_—* AND “ee 
SENDAX: LDPGMO 
oan 
:GO HERE WHEN DONE. 


BYTEA: 
BYTEX: 


pk kik tee KSUBROUTINE SENDPG** ke ek ew ee 
; SUBROUTINE TO SEND A PROGRAM. 
; (USED FOR DEBUGGING PURPOSES.) 


SENDPG: LDPGMO 
+4 


- EVEN 
SNDAX1: RTS ;RETURN 


peak eee * SUBROUTINE EE taco cal 

; SUBROUTINE TO PROVIDE AN ‘’x'' SECOND 

ZENTERS WITH COUNT EQUAL TO THE COMPLEMENT OF THE NUMBER 
;OF SECONDS DESIRED TO WAIT. 
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014472 3 CNTLOP: NULL1 DELAY ONE SECOND. 
014474 5237 032160 INC COUNT ;UP THE DELAY COUNTER 

14500 4 BNE CNTLOP ;CONTINUE LOOPING UNTIL COUNTER IS ZERO. 
014502 RTS PC RETURN WHEN DONE. 


FI II I ITI IO FI II II ITO IS III III IIIA IISA SIA NSIS ISISAISISSISSIASSAISISASISISISSSSSCSCSOS 


SROUTINE TO ADDRESS A MODULE USING ALL OF THE WRONG ADDRESSES 
zAND CHECK TO MAKE SURE THAT DATA ISN'T RETURNED. 


FIR I IIIT III III TIT TTT IIIT IOI TT TOTO ITOK II III I II III I IIIS II IAIN 


THIS ROUTINE IS DESIGNED FOR THE FOUNDATION MODULE 
[BUT WILL WORK FOR OTHER MODULES. 
014504 112737 000060 017277 MATD: MOVB #60,DSTADR SET UP ui 


:TO BE T 
014512 017277 ADSLOP: DSTADR ,RO 
004737 J PC ,FSTUF STUFF MODULE ADDRESS. 
6 #RE CBF O+2 CLEAR 1ST LOC. 
2134 017277 MODADR,DSTADR ;EQUAL TO SELECTED ADDRESS? 
ADSNXT 7YES, SELECT NEXT ADDR. 
032132 SIOSWH TSERIAL 1/0 IN USE? 

014542 ADSLP1 ;NOPE 


014544 
014546 014030 ;USE PADDED SERIAL PROGRAM. 


014550 000410 BR ADSLP2 
014552 104007 ADSLP1: Naptes 


014554 014112 LABSA 
ADDRESS THE FOUNDATION MODULE AS A SOURCE (NON-SERIAL 1/0). 
014556 LDPGMO 


014570 


023 
014572 


014572 004737 014422 ADSLP2: JSR PC ,SENDAX :SEND 2 CHARS. 
014576 104005 RECVRO ENABLE DL-11 RCVR. 
014600 104004 DELAY 


CHECK THE DATA TO SEE IF IT IS A,B,E0T. 
SINCE OTHER MODULES MAY INDEED BE [N THE SYSTEM, OTHER 
zTHAN THE FOUNDATION MOD, THEY COULD POSSIBLY XMIT DATA WHEN 


014602 123722 000101 "A, (R2)+ 7WAS AN ‘‘A'' RETURNED? 
014606 001007 ADSNXT : NOPE. 

014610 123722 000102 *B,(R2)+ 7B? 

014614 001004 ADSNXT NOT A B. 


sss wsuatEtsts 
WONAULRWR-O 
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014616 Ree nee 000004 CMPB MEOT, (R2)+ sE0T? 
014622 00100 BNE ADSNXT 


ONLY THE STRING A,B,EOT CAN MAKE IT TO HERE. 


014624 000407 BR ADSER1 


; THAT STRING SHOULD NOT HAVE 
;BEEN RECEIVED. 


014626 105237 017277 ADSNXT: INCB DSTADR ;UPDATE MODULE ADDRESS. 
000077 017277 CMPB #77,DSTADR ; DONE? 
BN ADSLOP i 
svewe 


R PC 
017277 031166 ADSER1: DSTADR,ERR13A 
MO ;MODULE ENABLED 
014654 031124 sWITH ILLEGAL 


ADDRESS. 
014656 000763 ADSNXT 
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3638 

3639 

3640 ICICI ICICI TAA AI IISIISSSASSAIAIIAI AIS SSAA AA SSAA SSA SAS SISA. 
3641 ;ROUTINE TO STUFF THE ADDRESS IN RO INTO THE PADDED SERIAL 

3642 31/0 PROGRAM AND UN=PADDED PROGRAM. 

3643 III OR IOICICIOIOIOICIOIOIOIOIOIIOIIOIOIIOIOIUIOIOIOIOIOIOI ISOS IOS ASA ASASASSISSSISSSSSSISSASSSAA 
3644 

3645 

3646 014660 110037 014042 FSTUF: MOVB RO,FLAB1 

3647 014664 110037 014037 MOVB RO,FLAB2 

3648 014670 110037 014067 MOVB RO,FLAB3 

3649 014674 110037 014363 MOVB RO,FLAB4 

3650 014700 110037 014113 MOVB RO,FLABS 

3651 014704 110037 014351 MOVB RO,FLAB6 

3652 014710 110037 013660 MOVB RO,FLAB7 

3653 014714 000207 RTS PC RETURN. 
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ARI ISO IORI ICICI IE BOI IIIT DISA ISAIIIIIISIIAIS AAI AI AIA ASSIA ISSA SSAA. 
;KEYBOARD SERVICE ROUTINE. CHARACTERS ARE ACCEPTED FROM THE KEYBOARD, 
; TESTED FOR DIFFERENT FUNCTIONS AND SAVED IN A BUFFER. 


FI I III TEI TIO TI III TOT TTT ICICI ICICI TE FIO IOII TO TIO SOTO TT OTOIOSOTOIOIOSOIIOIS SASSI SN 


014716 XTTYIN: SAVREG ;SAVE REGISTERS 
CLR CLR SOFTWARE Sw. 
BOUT Se COUNTER 


UBOUT SW 
;SET UP BUFFER a 
> CHARACTER READY? 


:NO, WAIT 
164372 YES, SAVE IT 
000200 ;STRIPE OFF PARITY BIT 
R1 WAS ‘HERE IS‘ TYPED? 


sYES, IGNORE IT 
032150 ! : INTERRUPTED FROM SEND ROUTINE 
032122 ‘ INTERRUPT FROM PRINT? 
ORE IT 


; CHAR. 
000002 a YES. RETURN CALL +4 
000060 : + SPECIAL rs ies 
BM YES, TEST 


000132 SPECIAL CHARACTER 
BM YES, TEST IT 

032122 ; INTERRUPTED FROM PRINT ROUTINE? 
BN ES, IGNORE IT 

032216 : ;RUBOUT SW. SET? 
B ° NO, NORMAL ECHO. 

032216 YES, CLR IT. 


PRINT '\' TO TERMINATE RUBOUT MODE 
R1,(R4)+ ; SAVE CHARACTER 
032214 CHRCNT 
000102 032214 #66. ,CHRCNT ;BUFFER FULL? 
TYPEQM sVES, TYPE *?° 
;NO, ECHO CHAR 
INPUT4 [WAIT FOR NEXT CHAR. 
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015150 
015152 
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001004 
104012 


104003 
000002 


032122 
000177 
052214 


032214 
032216 


032216 
000015 


000040 
000054 


000007 
023304 
000003 
sunt 
001000 


014666 
000022 


001000 
014642 
000005 


177106 
032122 
000017 
032152 


MACY11 30A(1052) 
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; SUBROUTINE ENTERED TO TEST FOR SPECIAL CHARACTERS 


SPCHR1: 


SPCHR3: 


EXTTY: 


SPCHRS: 


CNTRLG: 


CNTRLC: 


CNTRLA: 


CNTRLR: 


CNTRLE: 


CNTRLO: 


#1000, SP 
@RVECTR 
#5,R1 
CNTRLO 


@EVECTOR 
PRT SWH 
TYPEQM 
#17,R1 
EXTTY 
OPRT SW 
EXTTY 


2 ge Sgt on ee A ar ROUT INE ? 
:YES, CHECK F 
CHAR. = RUBOUT? 


;NO 
:YES, IS IT VALID? 
IGNORE 


IT 
YES, DECREMENT COUNTER 
;1N *RUBOUT' 
YES, JUST ECHO BACK CHAR. 


;PRINT | TO INDICATE RUBOUT 
;GET LAST CHAR. 
SET ‘RUBOUT" MODE 


CHAR. = ‘CR® ! 


YES, PRINT ‘CR=LF* 
sRESTORE REGISTERS 
sEXIT 


; CHAR. = SPACE? 
s¥eS, ECHO BUT DON* T SAVE IT 
* COMMA’ ? 


CHAR = 

YES, SAVE IT 
R1 —— G? 
CHECK FOR SOFTWARE SWR 
xX 


‘ = aia Sy 


; CHAR. 

ZNO CHECK FOR '*A' 
sRETURN- TO MONITOR 
HAR. **A"* 


iC 

:NO, CHECK FOR. %. % 

TRESET STACK POINTER 

:GO TO THE RESTART ADDRESS 


; CHAR 
:NO, TEST ‘on **5* 


;RESET STACK POINTER 

Bo TO Mave ADDRESS 

:NO,TEST FOR '*0°. 

:CLEAR OUT THE BUFFER. 

; CONTINUE ON TO NEXT SUBTEST 

; INTERRUPTED IN FROM PRINT ROUT INE? 
:NO, ILLEGAL ENTRY 

: CHAR. “o' 7 


:NO, IGNORE IT 
iYES. SET/RESET PRINT INHIBIT SW. 


SEQ 0108 


On 
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015320 
015322 
015324 
015330 


19=JAN=78 1 
104012 
031702 
000137 


000000 
015434 


014720 


MACY11 g phe 


SUBROUT INES 


TYPEQM: PRINT 
QMARK 
JMP XTTYIN+#2 


INBUF : 


0 


F 
nance 09:11 
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SEQ 0109 





an 
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; SUBROUTINE TO CHECK FOR AND PRINT PDP-70 CONTROL CHAR. 'S 
122701 000021 PDMSET: ry ADC1,R* CHAR = 21? 
004737 015650 PC ,PDMPRT [PRINT PDM CNTRL CHAR. 
MeSDCT STEXT "DCI" 
000022 MPB #DC2,R1 CHAR = 22? 
015650 J PC,PDMPRT SPRINT Deo" CNTRL CHAR. 


7 TEXT 
000023 MPB ADC3,R1 ;CHAR. = 23? 
015650 JS PC,PDMPRT PRINT PDM CNTRL 
TEST "DC3° 
000024 CMPB #DC4,R1 CHAR. = 24? 
015650 J PC,PDMPRT PRINT PDM CNTRL 


000002 MPB ASTX,R1 
015650 PC,PDMPRT ;PRINT PDM CNTRL 


000026 ASYN,R1 
015650 PC ,PDMPRT ;PRINT PDM CNTRL 


000001 MPB #SOH,R1 
015650 PC,PDMPRT sPRINT PDM CNTRL CHAR. 


000017 MPB #S1,R1 
015650 JS PC,PDMPRT ;PRINT PDM CNTRL CHAR. 


000004 CMPB #EOT,R1 
015650 JS PC ,PDMPRT ;PRINT PDM CNTRL CHAR. 


000003 MPB METX,R1 
015650 JS PC,PDMPRT ;PRINT PDM CNTRL CHAR. 


000140 #140,R1 71S CHAR. PRINTABLE? 
PDMST1 :NO, PRINT AS CONTROL CHAR. 


:YES, TYPE IT 
032150 TST SENDSW 


PDMSTO 
032142 FORMT1 
032142 000110 FORMT1 #72. 


PDMST2 
PDMSTO: 


032142 FORMT1 
BR +4 
PDMST1: PRINT AS CONTROL CHAR. 
PDMST2: RTS PC 
PDMPRT : PEXT2 CHAR. MATCH? 
000000 015662 MOV @(SP) ,XPDMES ZYES, GET ADDRESS OF MESSAGE 


XPDMES: 0 
032142 CLR FORMT1 sRE-SET ‘CR/LF*° FORMAT Sw. 
; CLEAN UP STACK 


R PC sEXIT 
000002 PEXT2: - aati CHECK NEXT WORD 





5th + sa agent tS TEST 
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015702 


016014 
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016124 


016124 
016120 


016120 
016120 


016114 
016116 


016016 
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SEQ 0111 


FIERRO ICI IORI IORI IORI TRIAD IAA ISSA ISISISIASSSSSSSSSSSSISSSSSSSS. 
[COMPUTE THE RESULT OF 'X" CONVERSIONS AS HIGH,LOW AND AVERAGE 

; THE ROUTINE IS ENTERED WITH THE NUMBER OF CONVERSIONS TO BE TAKEN IN 'R1' 
[AND WITH 'R2' CONTAINING THE ADDRESS OF THE DATA TO BE AVERAGED. 


TES SISOS IIT TITS ISIS III IIIS SSAA 


XAVRAGE : SAVREG 
CLR HIDIVD 

LODIVD 

HIGH 


LOW 
MO R1,LODIVR 
GETDAT: : (R2)+,R4 


R4,LOW 
R4,LODIVD 
HIDIVD 
R1 
BN GETDAT 
AVGDAT: PC,DIVIDE 
G 


SAVE REGISTERS 
;CLR HI-ORDER DIVIDEND 


High DIVIDEND 


LOW 
7SET UP DIVISOR FOR DIVIDE 
;GET VALUE 


31S NEW NO. GREATER THAN OLD NO.? 
zNO, TEST IF LESS THAN 
YES, SAVE NEW HIGH 


=NEW NO LESS THAN OLD NO.? 


;NO 
SYES, SAVE NEW LOW 
SADD VALUE TO LOW-ORDER DIVIDEND 


ZADD CARRY TO HI-ORDER DIVIDEND 
; DONE ? 

:NO 

;PREFORM DIVIDE 

ert RESTORE REG.'S 





C2 
C2 
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FAO ICICI ROSIER IIIT TOI ITT TA TATA IAAI IAAI IIIA ISS SAI ASIA SASS. 
;DOUBLE PERCISION DIVIDE SUBROUTINE 

;THIS ROUTINE IS ENTERED THIS WITH THE DIVISOR AND DIVIDENT PRE-LOADER 
INTO THE ROUTINE. 


RR III IIIT IIIT IRIS IIIT SOIT OSI 


016016 2 DIVIDE: SAVREG s SAVE REG.' 
MOV LODIVR,R1 ;GET LOW ORDER DIVISOR 
HIDIVR,R2 ;GET HIGH ORDER DIVISOR 
LODIVD,R3 ;GET LOW ORDER DIVIDEND 
HIDIVD,R4 ;GET HIGH ORDER DIVIDEND 
C R5 sUSE 'R5' TO STORE QUOTIENT 
DIVDIT: ‘ ; SUBTRACT L-O0 DIVISOR FROM DIVIDEND 
SB R4 ;SUB CARRY FROM HI-ORDER DIVIDEND 
; SUBTRACT HI-ORDER DIVISOR 
; SUBTRACTION SUCCESSFUL? 
NO, EXIT 
:YES, INCREMENT QUOTIENT 
;PREFORM NEXT SUBTRACTION 
R1,R3 ;ADD BACK OVERFLOW 
016126 iene ;SAVE AS REMAINDER 


.+10 
R1,R3 ao REMAINED > THAN HALF DIVISOR? 


.+4 
R5 :YES, ADD ‘1° TO QUOIENT 
016122 MOV R5,QUOENT + SAVE QUOIENT 
RESTORE REGISTER 
PC SERIF 
LODIVR: 


RTS 
0 
0 
0 
0 
0 
0 
0 
0 
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016234 
016232 


016274 
016220 


163144 
016234 
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SEQ 0113 


IORI III OIRO IIIS SOIT IIT TTA IAS IAIIAISIASIASISISASI ISSA SSA ISISSSSSASS. 
=DL11 RECEIVER INITIALIZATION ROUTINE. 

: THIS ROUTINE SETS UP A RECE!VER BUFFER WHERE DATA IS STORED AS IT COMES 
IN FROM THE DL11 RECEIVER. 


eerrretiititttiiittttititiiii iii ititi titi ii ii ii iii iii ae 


XRECRO: MOV #RECBFO,RO 
MOV vt RECVPT 


(RO) + 
we ape teties RO 


PARITY 
RECEOT 
RECBFO 
RECDC3 
RECSTX 


RECETX 

@RBUF 0 ;CLR RECVR. FLAGS 
#100, @RCSRO ENABLE THE INTERRUPT 
#RECBFO,R2 ;SET UP BUFFER POINTER 


CLR 1ST ‘20° LOCATIONS OF BUFFER 


PARITY: 0 
RECDC3: 
RECEOT: 
RECSTX: 
RECETX: 
RECVPT: 
RECBFO: 


RECEND: 
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016740 


017140 


010146 


016232 
162404 


024070 
016736 


024161 
040000 


010000 


016220 
000004 


016224 
032132 
000023 
016222 
000002 
016226 
000003 


016230 
016232 


162226 
032150 


001376 
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SIGRID ROTOR ITAA ITAA AIA IIASA IS ASISIASISI ASSIS SASS SSS SSISS IS. 
“SBITL DL11 RECEIVER SUBROUTINE. 

;ROUTINE IS ENTERED ON DL11 RECEIVER INTERRUPTS WHERE THE CHARACTER IS 
READ & SAVED IN A BUFFER 


rswrwererretrrrtitetititittittitittitiittitiititt iti itis iii iii i titre, 


RECVER: MOV 
MOV 


I 
RECVR1: 


I 
RECEXT: 


R 
RECERR: ; 


Pi 
ERRMES : 
J 


R1,-(SP) 
R2,-(SP) 
RECVPT,R1 
@RBUF 0 ,R2 
ay 


R1) 
AMES2 , ERRMES 
R1,4RECEND 
RECERR 
Re 
RECVR1 
AMES4 ,ERRMES 
#40000 ,R2 


RECERR 
#10000 .R2 
+6 


(SP, +.R1 


akC SRO 
SENDSW 


MONITR 


SAVE REG'S ‘R18R2° ON STACK 


;SET UP BUFFER POINTER 

[READ & SAVE CHAR 

ZSAVE CHAR. IN BUFFER 

: TERMINATE BUFFER W/ NULL CHAR. 
;NO, SET UP 1ST ERROR MESSAGE 
:RECEIVER BUFFER FULL? 

7YES PRINT BUFFER FULL MESSAGE 

:WAS RECVR. ERROR DETECTED? 


NO 
SETUP 2ND ERROR MESSAGE 
;OVERRUN FLAG SET? 
YES, PRINT OVERRUN ERROR MESSAGE 
;PARITY BIT SET? 
zNO, OK 
sYES, SET PARITY ERROR FLAG 
ZCHAR. =EOT? 


7NO 


;USING SERIAL INPUT OPTION? 
svES, EXIT 
;CHAR. =DC3? 
:NO 

sYES, SET FLAG 
sCHAR. = STX? 
ZNO 

sYES, SET FLAG. 
;CHAR. = ETX? 
=NO 

sYES, SET FLAG 


;DISABLE FURTHER INTERRUPTS 


;MODIFIED DEPENDING ON TYPE OF ERROR 
RETURN TO MONITOR ON RECVR. ERRORS 





CZ 
CZ 
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JIC IIIS OIRO IE BOIDIOII I IOI I TOIT RTT ATTA IA AIS ASS SIASSSASSS ASSIS SSSA. 
7 1F THE CONTROL MODULE IS BEING USED THIS ROUTINE PADS THE DATA 

;BEING TRANSMITTED SO THAT THE DESTINATION PORTION OF THE 

SERIAL I/0 MODULE GETS ADDRESSED. 


DI TIO IO TOIT TTI TOTTI TOI IASI IIIS ANSI NS SSS NSIS SSIS 


017144 005737 032132 XSOURC: TST SIOSWH ;SERIAL 1/0 INPUT? 

017150 BEQ XLDADD :NO, NORMAL LOAD 

017152 YES, SEND +S TX" TO ENTER ADDRESS MODE 
017154 000002 

017156 032154 TERMSW 

017162 00045 BR XLDADD 


9 ROI IOC RIOR IORI ISI IAI AAI IIIA IAI IASI IASI SISAA IAAI SAI AIA AA IAI AAI SSSI SAIS A. 
IF THE CONTROL MODULE IS BEING USED THIS ROUTINE PADS THE DATA 

;BEING TRANSMITTED SO THAT THE SOURCE PORTION OF THE SERIAL I/0 

sMODULE GETS ADDRESSED. 


PRR eel kt k lek k kha ke hehehe hehehehehe taelehelelehehehelelehehelelehelelelshaleinialalaleleleleheleleheleleieieleleleieleieleieieleliie! 


032132 XDSTIN: TST SIOSWH ;SERIAL 1/0 INPUT? 
BEQ XLDADD ;NO, NORMAL LOAD 
SADD, ADD CODE TO ADDRESS SOURCE 


XDSTG1 
STX 


;CLEAR FIFO 
8B ALERT SOURCE 
IADRS9: . sMODIFIED BY USER 


SET UP MODE ‘1°; WAIT 
017205 
017206 032154 XDSTG1: ; 


017212 032146 
017216 XLDADD 
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017220 


017300 
017301 


017302 
017306 
017312 
017316 


017320 
017326 
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005237 
011637 
062716 
000404 


017637 
000771 


032132 
000023 
000023 
000017 


017664 


000000 
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017300 
017300 
017300 


017666 


DL11 RECEIVER SUBROUTINE 


III TITTIES IOI AOI IAI III IIS IAS SIAISSIISISISISISISISISISICSASISISISISISIASIISISISISISISISIS SACS SASS 


; SUBROUTINE TO ADDRESS ANY SOURCE MODULE 


FI ICI IE ICI TICS IOI ISI IOI IOI IIA ASIII AISI AAS ISISASISI IIS IASI IISA SISIASISISSISISISISISISSSOSSCSSOSCS 


ADRSRC: ns ADDRESS AS SOURCE 
.+ 
RTS PC 
-BYTE DCI ALERT MODULE 
SRCADR: .BYTE 60 ;ADDRESS MODIFIED BY USER 
-BYTE SOH 
SOH1 : -BYTE 60 ADDRESS MODIFIED BY ME 
BYTE DC3 
-BYTE 
EVEN 


FI III II III I ICT TIC TOI TOTO TOIT IF III TRI ITIOICTOTOTOI OI OI I SSSIA I A III IAI IIS I SSSI SC 


; SUBROUTINE TO ADDRESS ANY DESTINATION MODULE 


FI II III IIIT I TTT I II III TTI TICK IK IIIT TIFT TT II KITT IR ERE 


ADRDST: ans — sUSING SERIAL 1/0? 


+12 :NO, 
CMPB ics, DSTADR+1 7 YES. USING 'DC3"? 
BEQ +12 :YES, LOAD 'SI" 
ae mcs, ,DSTADR+1 :NO, LOAD DC3 


MOVB #S1,DSTADR+1 
a? ess ADDRESS DESTINATION 
.+ 
RTS PC 
BYTE DC2 s;ALERT MODULE 
DSTADR: .BYTE 60 ;ADDRESS MODIFIED BY USER 
-BYTE DC3 
-BYTE 
- EVEN 


FIR RIK RII IKKE REE KERR REE KE EER EK 


; SUBROUTINE TO TRANSMIT A SINGLE CHARACTER VIA THE DL11. 


LIRR IRR KKK KERR RRR REE ERK EERE EKER KERR EKER EEE REE KERR EEK EK 


XLDCHR: INC SNGCHR SET SOFTWARE FLAG 

MOV (SP) , TRANPT ;SET UP ADDRESS OF CHAR. TO BE TRANSMITTED 
XLD1: ADD #2, (SP) SET UP STACK TO EXIT 

BR TRNSMT 


REE KEKE EEE KEE EEE KEE KEKEEKEKEKEE KK EKEKEEEEKEKEKK 


: SUBROUTINE TO SETUP AN ADDRESS FROM WHICH DATA IS TO BE TRANSMITTED VIA 


FIT TIT TT TT IIE REE EREEREREREKEE 


XLDADD: = 5 apne ;SETUP ADDRESS OF DATA TO BE TRANSFERRED 
XL 


SEQ 0116 
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000000 
017344 


017666 — 
010000 


032214 
032214 
004000 


000004 
000023 


010000 
161714 


161710 
017664 


000004 
000003 


017664 
001000 


032144 
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161774 


161750 


161712 


161642 


DL11 RECEIVER SUBROUTINE. 


DIR IIIIIOIITOI I IOI TOI IOI TOT TIO III III II IIIS I IAI IS IISA SIS SISSSISSSISISSISS SSS SSS SE 
-SBTTL DL11 TRANSMITTER ROUTINE 

+ THIS ROUTINE IS ENTERED WITH THE ADDRESS OF THE CHARACTER OR CHARACTERS 
TO BE TRANSMITTED IN ry TRANPT'. CHARACTERS ARE TRANSMITTED UNTIL 

SEITHER AND "EOT', ‘EXT’ OR A NULL CHARACTER IS TRANSMITTED. 

31S SET, THE SAME CHARACTER IS TRANSMITTED EVERY TIME. IF ‘SwW12" IS SET, 
[THE PROGRAM WAITS FOR A 'CR' TO BE TYPED BEFORE THE CHARACTER IS TRANS- 

:MITTED. AS IT IS TRANSMITTED, IT IS ALSO PRINTED. 


CC CCRC ICRICRIOIOIICIIORIIII I I III IAA ITT TAT TT TTT TTT TT TTT TTT TT TT TT TTT TT TT TE 


TRNSMT: SAVREG 
MOV #0, -(SP)  ;ENABLE INTERRUPTS 
#1$, -(SP) 


1$: MO TRANPT ,R1 ;SET UP TRANSMITTER BUFFER POINTER. 
TRANO: an :SINGLE STEP TRANSFER? 


:NO, 

CHRCNT YES, SET TTY SOFTWARE FLAG 
[WAIT FOR ‘CR' 

CHRCNT ;WAS THE INTERRUPT FROM TTY? 
-6 ; WAIT AGAIN 

#sull, -@SWR ; TRANSMIT SAME CHAR. ? 


-(R1) YES, BACK UP POINTER 
: DONE ? 


(R1) 
TRANG cYES, EXIT 
#EOT,(R1) 


TRAN 
#0C3,(R1) 
TRANS 


(R1) ; TERMINATOR CHAR. ? 

TRNEXT :YES, EXIT 

#SW12,aSWR STRNSMITTING SINGLE STEP? 

TRAN6 YES, PRINT CHAR. TO BE TRANSMITTED 
aad [WAIT FOR READY 


(R1) , @XBUFO 7 TRANSMIT CHAR. 

SNGCHR SSINGLE CHAR. TRANSFER? 
BN TRNEXT 7YES, EXIT 

TRAN2: #EOT,(R1) : TRANSMITTED LAST CHAR. ? 
TRNEXT 


zYES, EXIT 
METX,(R1)+ 
ea NO, TRANSMIT NEXT CHAR. 


SNG 

7SW09. @aSWR 31S DATA 'SW9" SET? 
+12 YES, INHIBIT DELAY 

DLYSWH ISSUE DELAY? 

:NO, SKIP IT 

:DELAY BEFORE EXITING 

:RESTORE REG.'S 


BN 
TRNEXT: 
B 


° 


SEQ 0117 
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017526 005737 032154 TRANG : TERMSW ADDRESS SERIAL 1/0? 
TRAN3 :NO 
032154 TERMSW 
TRANGA: A ;YES, ADD CODE TO ADDRESS SOURCE 
TRNEXT 
DCI ALERT SOURCE 


IADRS7: . “MODIFIED BY USER 


ENABLE IT 
017553 


017554 032154 3 ;SOURCE INPUT SW. SET? 
RAN3 3;NO, NORMAL TRANSMIT 
032154 YES, ADDRESS DESTINATION 
032146 : CURRENTLY ADDR. A DST. MODULE? 
SEND 'DC2’ TO ee DST. 
032136 yes, USING REMOTE DST.? 


TRAN5B 
017644 017636 TRANSA: i aap “YES, DON'T ENABLE MY DST. 
017543 017636 TRANSB: ae TRANSE ;YES, SEND ONLY THE ADDR. 


D 
017642 017636 TRANSC: AMTRANSF ,TRANSE ;SEND ‘DC2' 
032146 TRANSD : TSWH 


TRANSE: .+4 
BR " 
TRANSF : ;ALERT DEST. 


IADRS8: . sMODIFIED BY USER 
TRANSG: . 


TRAN6: 
015434 JS PC,PDMSET 
TRAN? 
SNGCHR: 0 
017666 TRANPT : 
017670 000000 TRNBFO: 0 


020372 000000 TRNEND: 0 
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© We HH II I HII TE IIT HIF TE ICICI TOTTI TTI II TTI I SII TITTIES TE TH IT I HTH TTT THK RIK 


SROUTINE TO REQUEST & SAVE MODULE ADDRESS TO BE USED FOR TESTING 


REAR EER REREEEER ERE EEE REE E RE REEREREREE EERE EERE REE EH 


020374 XADRES: PRINT 
MES30 


;TEXT "MODULE ADDR. ?' 
WAIT & DECODE INPUT 
000060 ; CONVERT TO ASCII 
032132 ;SERIAL INPUT? 
+10 NO, ALLOW ANY ADDRESS 
002214 YES, CHECK AGAINST SERIAL 1/0 
032136 RES SAME, REQUEST IT AGAIN 


017227 SET UP SOURCE ADDR. 
017277 RO.DSTADR fH A gettin ADDR. 


5 Be REIT T B Be SESE ICICI IOIIOIOSOTOIO SE SOIOTOIOIO TORSO SOIT SAIS SSI ISIS ISM 


: SUBROUTINE ENTERED ON AN ILLEGAL TRAP. THE ROUTINE REPORTS WHERE IT 
; TRAPPED ‘FROM’ AND WHERE IT TRAP ‘TO’. 


1 ICRC OORT II III IIIS IIIS SSSSSSSSSSSSSSSSSSSSSSSA SSAA. 
011637 032156 ERTRAP: + (SP) , TOPC SAVE LOCATION WHERE IT TRAPPED '‘TO' 


032162 aaa (SP) ,F ROMPC SAVE WHERE IT TRAPPED FROM. 
MESS TEXT ‘ILLEGAL TRAP TO’ 
000004 032156 SUB #4,TOPC 
PRTOCT 
TOPC TYPE *PC* TRAPPED TO 
PRINT 
MES6 ; TEXT ‘FROM’ 
000002 032162 SUB #2,FROMPC 
PRTOCT 
F ROMPC ; TYPE WHERE IT TRAPPED FROM 
001376 JMP MONITR ;RETURN TO MONITOR 


FI IRCCS IOIO I IOI IOI III III IIA SISA SII SISISIESISIISIISISISSISSISISSSSSSSISSIASSSSSOSST 


; SUBROUTINE TO REQUEST A/D CHANNEL FROM TELETYPE 


FF RIT ICI III IOI SOIT IOI IOI I IIIS III I IIIS IIIA SIS ISIS AS ASSISSICSISSSION 


XCHANEL : PRINT 
MES17 TEXT ‘CH.?° 
WAIT FOR INPUT 
000064 015330 #64 , INBUF LEGAL CH 
XCHANEL :NO, REQUEST NEW CH. 
015330 017231 INBUF , SOH1 iYES. SETUP CH. 
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020540 000100 


032200 
1000 


000 
000002 
020000 


160526 
021626 


040000 
004000 
020772 
020772 


020710 


000060 
020772 


032206 
020750 
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160610 
020616 
160560 


032200 


160502 
160472 
020770 


DL11 TRANSMITTER ROUTINE SEQ 0120 


FCI ORICA IIA IIIS IID I IAS IAIIASISIASSISSISISSSSSSSSSSSSSSS ISS SSSA 
;MODULE ERROR REPORT ROUTINE. 

; THIS ROUTINE IS ENTERED WHEN A MODULE ERROR IS DETECTED. IT PRINTS THE 
FAILING TEST NUMBER, THE MEMORY ADDRESS (MA) WHERE ERROR OCCURRED AND 
3AN ERROR MESSAGE OBTAINED IN THE ERROR CALL+2 


IIIB ICICI IIIT I IIT IOI OT IOI I SOTO IOI III I III ASIANA AIS IIIS SI SII SISIASI SSI SISSINSSISISS SSNS 


#100, a@RCSRO 


XERMES: BIC 
MOV (SP) ,KSTOR3 


ieaue a INTERRUPT ENABLES. 
@(SP) ,MESADR TSAVE MESSAGE ADDRESS 
#2, (SP) SET UP STACK TO EXIT 
#SW13,aSWR SPRINT ERROR MESSAGE? 
ERREXT :NO, EXIT 

:YES 

PRINT FAILING TEST NO. 
#2,KSTOR3 
PRINT 'MA* WHERE ERROR OCCURRED 
;PRINT ERROR MESSAGE 


;HALT ON ERROR 
3NO 


Pp 
ME SADR: 
ERREXT: aSwWR 
BM .+10 
PC, TTYENB 
;WAIT FOR *CR*® TO CONTINUE 


= eH KEKE EKER EEKKEKERKEKEKEEKEKKKKEKKKK 


[SCOPE AND/OR ITERATION LOOP FOR EACH LOGIC TEST 


Ri Ria Ra eR R Rahal lake he hele heke lahat lahelahele hehehehe hehehe leheleleleheleleheheleleleleieielelelelelicleielelcleielcleleieielelel 


XSCOPE: TSTTKS 
RECVRO 
440000 ,aSWR 
SCOPEB 
——e 


SCOPEF , ICOUNT 
OPEG 


I 
SCOPEB: 
MO 


#1$, -(SP) 


@RE TURN 
SCOPEF 


aSP,R1 
(R1),TSTNUM 
#2, (SP) 
aSWR,R1 
#177700,R1 
R1,TSTNUM 
+14 


1$: J 
SCOPEG: 


CHECK FOR KEYBOARD FLAG 

ENABLE DL11 RECEIVER 

TEST SwW-14 FOR SCOPE 

:YES, SCOPE 

;NO-TEST SW-11 FOR ITERATION 

: INHIBIT ITERATION 

COMPARE CURRENT COUNT TO MAX NUMBER 


SREPOSITION STACK 
RESTORE PREVIOUS PROCESSOR STATUS 


REPEAT TEST 
;CLEAR COUNT 
SAVE TEST NO. 


sREAD Sw'S 
;CLR_UNWANTED BITS 
;HALT ON THIS TEST 


10 
3 VES 





on 
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020752 024437 ; TEXT "BREAK AT SCOPE X' 


YIN ;WAIT FOR ‘'CR* TO CONTINUE 
020774 @SP ,RETURN ;SAVE SCOPE RETURN POINTER 
I RETURN INLINE=-NEXT TEST 
; ITERATION COUNT 
; COUNT LOCATION FOR ITERATION LOOP 
020774 


299K 9K IOI IORI ISI III IAI IIA IS AISI SIISSISSIIISI IAI IS SIS IIS AAI IAI IAI IAI ISI SSAA. 
RANDOM NUMBER SUBROUTINE 

;THIS ROUTINE CREATES A RANDOM NUMBER, MASKS IT TO EIGHT BITS AND SAVES 
31T IN THE TRANSMITTER BUFFER AREA. 


FI II III I ICI IIIT TICS IIIT ICICI SE FICCI TOIT TOTTI IOI OST OSTA SAN 


020776 012701 017670 : #TRNBFO,R1 
021134 D 
021134 


021136 
021136 


021140 
021140 


RANC, (R1) ; SAVE NUMBER 

#100200, (R1) :STRIPE NO. TO 7 BIT ASCII 
#60000, (R1) 31S BIT 5 OR 6 HIGH BYTE SET 
+6 YES, LEAVE AS I 

#40000, (R1) NO, FORCE BIT 6. 

#140,(R1) :1S BIT 5 OR 6 OF LOW BYT SET 
-+6 YES, LEAVE AS IS 

#40,(R1) 3NO, FORCE BIT '5' 

(R1)+ 


020372 ATRNEND ,R1 ; DONE 
XRANGN+4 
020372 TRNEND ; TERMINATE BUFFER. 


No RSaNSR 


101234 101234 





On 
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FICO ROTORS RIOR III II IIIT TRAIT AAI AAI IASI IAA AIS SAIS AAS IASI ASSASSINS. 
;ROUTINE TO LOOP THRU », SINGLE LOGIC SUBTEST. ENTERED FROM THE ‘MONITOR’ 
VIA SELECTING TEST °?°. 


PRA Raha ha haa daka hahahaha hahahalakehahalehaletehaiehelehehehaheiahaheheheishelelaheleleiahehelehelaheheieieialelehelelaleheieieiclcieielsieleisieielel 


021142 SUBX : 
TEXT "TEST ADDR.? ' 
YES, GET ADDR. FROM TTY. 
WAS AN ADDRESS ENTERED? 
:YES, LOAD IT 

032174 3NO, WAS ONE PREVIOUSLY SET UP? 

YES, RUN OLD ADDRESS 
:NO, ILLEGAL ENTRY 


BR 7 ASK - NEW ADDRESS 
032174 : RO,KSTOR1 ; SAVE ADDRESS 
00002 032174 #2,KSTOR1 ZADD '2° TO POINT TO INSTRUCTION AFTER SCOPE 
032206 @KSTOR1,TSTNUM ;LOAD TEST NO. 
032174 #2,KSTOR1 
: SCOPEF ;KEEP COUNT AT ZERO 
020774 MO AXLOOP,RETURN ;LOAD SCOPE LOOP RETURN POINTER 
010740 @KSTOR1 ; JUMP TO TEST 


REE ERR RRR EEE ERE EERE REE ERERREE ERE REE REE ERE 


; SUBROUTINE TO ISSUE N SPACES 

3N_IS ONE PLUS VALUE CONTAINED IN SPACEX 

7SPACEX IS CLEARED WITHIN THE SUBROUTINE, SO THAT A CALL ON 
; SPACE WITHOUT LOADING SPACEX ISSUES ONLY ONE SPACE 


FERRARA REE EEREREE EEE EEE ERE RERERERER RRR 


XSPACE: SAVREG SAVE REG'S 
000240 MOVB #240,R1 
EIT ;OUTPUT A SPACE 


021262 SPACEX ;DECREMENT COUNT 

XSPACE+2 ;LOOP IF NOT DONE 
021262 7 ;RESET COUNT TO ZERO 
;RESTORE REG'S 
;RETURN 


RTI 
SPACEX: 0 


Pala Ne Blaha Relea Rha la hehehe hehehehehe Retehaheheheheheheheieheheheheheleheheleiehehehelelahaleleheleleleleleieieleleieleleieielcieleislcleielel 


; SUBROUTINE TO TEST FOR THE KEYBOARD FLAG BEING SET 


FERRARA EERE KEE REE EERE KERR REE EERERE REREAD 


105777 160052 TKSFLG: TSTB aqtKS FLAG SET? 

1 1 BPL +4 :NO, EXIT 

104013 TTYIN 7 YES, INQUIRE 
021274 000002 RTI 





aa 
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021276 011637 020774 


032124 
032224 


032206 


021626 
157776 


032136 
021366 


157754 
021374 


021376 000012 
000015 
032122 
032122 
000100 


000100 
021440 


L11 TRANSMITTER ROUTINE SEQ 9123 


TERRE EKER KERR KKK CARRS SSSSESASSSESE SESSA SSSA S RARER S RRR S RARER SESS BS 


; SUBROUTINE TO SETUP PARAMETERS FOR THE MODULE PROGRAM TESTS. 


Skah ahahahalahalelehahalahelelahaheieleieiahahahalalahaheleinhaheheielelahelelelalelehelsleleleheislololeleieieielaleisielaieleleielelialel 


XSETUP: MOV (SP) ,RETURN SET UP THE "SCOPE* RETURN ADDRESS. 
MOV (SP) ,RVECTR 
#2,RVECTR SET UP THE RESTART ADDRESS 
RVECTR,RESTRT ;AND THE ‘C* POINTER 
I COUNT 
#1,TSTNUM SET UP TEST ‘1° 
ENABLE DL11 RECEIVER 


PRR ESESSL£L£L AR BESS SESESRS SSS SS SSE SESE SERRA ASRS AS ARRAS SARA SR AREER DSO D 


‘SUBROUTINE TO PRINT CHARACTER IN 'R1° 


FH REE K EK 


XTYPIT: JSR PC, TTYENB ENABLE INTERRUPTS 
TSTB aTPS ;PRINTER READY 


zNO 
—s DST.? 
iN 
R1,XTYPE1 sYES, SET UP TO TRANSMIT CHAR. 
XTYPE1: 
XTYPE2: : R1,a7PB ZPRINT CHAR. 


= he eh ee ee KEKE KKK EEK KEKE KKEKREKKE 


; SUBROUTINE TO PRINT THE CONTROL CHARACTER IN 'R1'. 


FREER ERE RRR EERE EEE ER RRR REE EERE 
XPRCNT: CMPB ZCHAR = LF? 

BEQ sYES 

;CHAR. = ‘CR'? 

PRT SWH,-(SP) sSAVE SW. STATUS 
(SP)+,PRTSWH 
#100,R1 sMAKE CHAR. PRINTABLE 
#100,R1 ;RESTORE ORGINAL VALUE 


BIS 
XPRCT1: 
BIC 
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021442 


021502 
021510 
021514 
021516 
021522 


021524 
021530 
021532 
021534 
021536 
021542 


021544 
021552 


021554 


021624 


012737 
000002 


arte 


032140 


000131 


032140 
017227 


032140 
032136 
017234 


032156 


032136 


000001 


000002 


000000 
021576 


000011 
157536 


157532 
021262 
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021262 


021262 
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ORES ESSESASLLSSASLALE SE SESE SEES ESR R SRR SSSR SRSA RRA R RRR ARRAS SARA S SSD DS 


> SUBROUTINE TO CHECK FOR AND SET UP A REMOTE DESTINATION MODULE. 


LRARRAREREAEEEEEREEREREREREEREEERERRERERAERERERRERERRERERE REAR RREERERKAE RAH 


REMOTE: MOVB 
CLR 


SETRMT: ; 


XNODLY : 
R 


RO,R5 
KSTORO 


#'°Y, INBUF 
.+10 


RO,KSTORO 
R5,SRCADR 
PC 


KSTORO ,REPTSW 
REPTSW 
- 


-+6 
PC ,ADRDST 
PC 


REPT SW 
+6 


REPT SW 
PC 


#1 ,DLYSWH 


; TEMPORARILY SAVE MODULE ADDRESS 
7CLR SOFTWARE SW. 


;TEXT "REMOTE DEST.?"’ 
;WAIT FOR INPUT 
: WAS YES TYPED? 


;NO 

iYES, REQUEST IT'S ADDRESS 

SAVE IT, THIS ALSO SETS SOFTWARE Sw. 
“SET UP A/D SOURCE ADDR. 
RETURN 


SET UP THE REMOTE DESTINATION SW. 
;USING REMOTE DEST.? 


NO, EXIT 

YES, ADDRESS IT 

a ae TO THE DEMOTE DST.? 
YES, SEND "EOT' TO CLR MODULE 


;RETURN 
7SET THE TRANS. DELAY INHIBIT Sw. 


MAREE SESAALA£ SESE RESESSR SSE SES RS SAR SERS ARERR AAAS RAR ARRAS ASRS RASA RAR RRR SSDS DS 


[SUBROUTINE TO TRANSMIT A "NULL" CHAR. TO THE PRINTER. 


FARE RE RE EEEEERERERA ER REREEKERERE KEE EKER EERE RENE REE EEREERE REE E ERE K 


XNULL : 


XNULL1: 


1$: 


: M 
XNULL2: 


#2, SPACEX 

XNULL2 

#0, -(SP) 
’ (SP) 


#11,SPACEX 
TPS 


sENABLE INTERRUPTS 


; TRANSMIT A NULL CHAR, 


SEQ 0124 





Ci 
Ci 
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021626 


021650 


012777 


000100 
000000 
021646 


032152 
032122 
021626 
000000 
000002 


000004 


000137 
000100 
032122 


032152 
032152 
000045 
000075 


000012 


MACY11 
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TPP PSESSSLSLOSLESE SS SS RSE SSR ESS SERRE SER RRS RS RRR RARER SRSA S ARRAS SD DOS 


[SUBROUTINE ENABLE KEYBOARD INTERRUPTS. 


PRR h hhh hehehehe tala la hale hehehehehe tatatahahalahahehehelniahahaheialahaheheielehaleheleleleheleleieialeleleielelcisieisicleieieieicleieieiele 


#100,aTKS YES, ENABLE TTY INTERRUPTS 
At “a ENABLE INTERRUPTS 


1$: PC 


FERRER ARR ERE EREEEREREEREEKRERREERRERREREEE ERR ER 
MESSAGE PRINT ROUTINE, ENTERED VIA EMT DISPATCH HANDLER. 
ROUTINE PICKS UP CONTENTS OF THE 'PC' AND USES THIS AS 
: THE ADDRESS OF MESSAGE TO BE TYPED. 
IS NEXT MESSAGE SWITCH 
"y IS CRLF SWITCH 
:@ IS END OF MESSAGE SWITCH 


TR I I ICICI I RSI OIOIIEIEIEIOIOIOIOIIIOI III TOIT IST AISI SISA SASSI SISA IAS AAAS 


XPRINT: Tate SAVE REGISTERS ON STACK 


ENABLE TTY INTERRUPTS 
GET THE MESSAGE ADDRESS FROM STACK 
SET UP STACK TO EXIT 
(R2)+,R1 GET CHAR. 
RI ;=NULL_ CHAR. ? 
PRTEXT ZYES, EXIT 
#4 RI TEST FOR ‘EOT' 
.+10 NOT EOT 
YES, PRINT ‘EOT" 


PRTEXT sEXIT 
sTest FOR *.* 
SYES PICK a NEXT MESSAGE ADDRESS. 
TEST FOR 
BRANCH IF NO EQUAL 


TYPER3: 
TYPERA: 


PRTEXT: 


RESTORE REGISTERS FROM STACK. 
OTHERWISE EXIT 

; INHIBIT TYPEOQUT? 

:YES, SCAN DATA 

; OR ‘%' 


TYPER1: 


TYPECL 


TYPERA 
#15,R1 


TYPER2: 
BR 
TYPECL: MOV 


“QUTPUT CHAR. 
:TYPE ‘CR* 


#12,R1 
TYPERA 


; INCREMENT BUFFER 
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022010 


022114 


022116 


022160 
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004737 021626 
017601 000000 
062716 000002 


012703 000006 
012737 000376 


143702 022114 
052702 000260 
000200 


110277 157252 
012737 000370 


012737 161000 
0004 
005037 032212 
0047 


005237 032212 
005237 032210 


MACY11 14 the 


022114 


157256 


022114 


032212 


032210 


J 
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SEQ 0126 


FCCC TRIO AAI IAI IAI IAI SASSI IIASA IASI ISSI ISS ISSASIAISSSSSSSSSSS 
: SUBROUTINE TO TYPEOUT A '6" DIGIT OCTAL NO. THE 'PC' CONTAINS 
*WORD' TO BE TYPED 


eeetittt iti titittttiiiittttiitittitiiiii iii iii iii ere 


; THE ADDRESS OF 


XOCTPR: 


MOVEIT: 


MASK: 


JSR 
SAVREG 


PC, TTYENB 


a(SP) ,R1 
#2, (SP) 


#200, aTPS 
-6 


R2,aTPB 
4370,MASK 


R3 
MOVE IT 


ENABLE TTY INTERRUPTS 

;SAVE REGISTERS ON STACK 

; THE ADDRESS OF WORD TO BE TYPED 
;SET UP STACK TO EXIT 


MASK FOR FIRST BIT 


;PRINT CHAR. 
MASK FOR NEXT '5* DIGITS 


;RESTORE REGISTERS FROM STACK. 


MARSA SRSALASAL£LLL SESSLER S SESS SERS ERR SSSA SERRE RASA SR SSAA SARA SASS RASA S SS SS 


y SUBROUTINE TO SET UP AN APPROXIMATE ‘1° SECOND DELAY. 


Rie Ral Rl Sa Ba hehe SelB kB hahahahahaha tetahahahehalehehelelehelalelaheheheleleleleislahaialeieleleleheieiaieheleleleidislelieleleielelel 


XDELAY: 
XDLAYL: 


XDLAY3: 


XDLAY2: 


#161000, TEMP2 


XDLAY3 


;SET UP SHORT DELAY 


SET UP LONG DELAY 
ZENABLE TTY INTERRUPTS 


C2 
CZ 
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SAREE ERE REE RE K 


; SUBROUTINE TO PRINT THE DATA IN THE DL11 RECEIVER & TRANSMITTER BUFFER. 


FRR ERE RRR ERR ERE REE EERE REE RE REE EERE EERE EERE ER 
022162 PRIBF 1: ome 


CRL 
PRIBF 2: ;BUFFER EMPTY? 
BN :NO, PRINT IT 


YES 
STEXT “BUFFER EMPTY' 


BR sEXIT 
021626 sENABLE INTR.'S. 
032142 C ORMT 1 > "CR/LF' FORMAT SW. 

PRT1A: P 7GET CHARACTER 
015434 J PC ,PDMSET ;PRINT CHAR. 
(R2) ; DONE? 
3N PRT1A 
022222 PRT1B: PC RETURN 


FRR EEREER ERE 


; SUBROUTINE TO PRINT THE CONTENTS OF THE DL11 RECVR. BUFFER. 


LRA RARE REE EEE RRR E REE KEKE EKRERE REE ER 


022224 012702 016234 RECBUF : MOV #MRECBFO,R2 ;SET UP BUFFER POINTER 
022230 000402 BR TRNBUF +4 


LAA REE EEEKKEEREEEERE REE RRR EEK 


; SUBROUTINE TO PRINT THE CONTENTS OF THE DL11 TRANSMITTER BUFFER 


FRR RRR REE EERE RERRRREREE REE ERE EE 


022232 012702 017670 TRNBUF : MOV ATRNBFO,R2 ;SET UP BUFFER POINTER 
022236 004737 022162 JSR PC,PRIBF1 
022242 000137 001376 JMP MONITR ;RETURN TO MONITOR 


MARAE EASESASLASLLS ESSE SEES ESE SEES ES ER ESSER ARRAS ARRAS ARRAS SRA SSA S SSS DSSS 


; SUBROUTINE, ENTERED AS A SUBROUTINE, TO PRINT CONTENTS OF THE DL11 
sRECEIVER BUFFER. 


LEAR ERE REE REE RRR RRR ERERREREREERREREREERREEREREEEEEEKH 


022246 104002 XPRTRB: SAVREG ;SAVE REG'S 
016234 MOV #RECBFO,R2 ; SETUP BUFFER POINTER 
022166 JSR PC ,PRIBF 2 
GETREG ;RESTORE REG.'S 
022262 RTI 
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.SBTTL SEND ROUTINE 

PISANI ISI IIIS I CIOIOICIOIOIE SEIS IIIT I ITI TTT TTT AIT AA ISSA SSIS SIS ASSSSASSSS. 
STHIS ROUTINE ACCEPTS CHARACTERS FROM THE TELETYPE AND TRANSMITS THEM 
:TO THE DL11. THIS ROUTINE USES ‘'*E* TO ESCAPE BACK TO THE MONITOR. 
[CONTROL C (*C) IS ECHOED AND SENT AS AN ‘EXT’ 


pereverrrrrrrtertsrrterectrreteretieter titi tt titit it tt titi ttt titi t ities. 


SEND: SETUP ;SETUP RESTART ADDRESS 

PRINT 

ASTRIC 

NODLAY ; INHIBIT TRANSMITTER DELAY 
032150 INC SEND SW ;SET SOFTWARE SW 

TENABLE DL O'S RECVR 
017670 MOV #TRNBFO,R2 ;SET UP BUFFER TO SAVE CHAR.S 
021626 JS PC, TTYENB ENABLE TTY INTERRUPTS 
: [WAIT FOR KEYBOARD & RECEIVER INTERRUPTS 

oe ;KEYBOARD INTERRUPTS RETURN .+2 
015330 INBUF ,R1 : C 
000005 


HAR. 
#5,R1 ;C  ¥e 


.+10 NO 
:YES, TYPE IT 
001376 JMP MONITR sEX XIT 
R1,(R2) ;SAVE CHAR. 


022354 (R2)+, SEND2 
(R2) ;LOAD 'O* TO TERMINATE BUFFER 
015434 J PC,PDMSET sPRINT CHAR. 
; TRANSMIT CHAR. 
SEND2: 


022356 BR SEND1 
-SBTTL RUN ROUTINE 


RIOR ROR CROCCO RUICIOI IORI III ITO AAAS AAS AAAS IISISAISSASSSISISAISA SSSA. 
THIS ROUTINE IS USED TO LOAD AND RUN TRANSMIT THE USERS SEND 

IN PROGRAM. DATA SW.'S ‘O-15" CAN BE USED TO SET UP 

3A LOOP DELAY. IF THIS SERIAL I/O OPTION INPUT IS BEING USED, 

; THE USERS PROGRAM ISN'T LOOPED, IT IS JUST LOADED AND RUN. 


FI RH II RIKI RIKER ERE KEE RARER EERE REE RE K 


RUN: 


7 INHIBIT TRANS. DELAY 
000000 MO #0, -(SP) ENABLE INTERRUPTS 
022400 #1$, -(SP) 


ENABLE DL RECV 
LOAD THE USERS. PROGAM FROM 


032132 : INP 
156732 as “LOAD THE SwW.'S TO SET DELAY 


022426 
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.SBTTL SUBROUTINES 
SIGIR ISIC IOICIC RICCI IOI IIASA AISA ISAS IS ASSIS ISIS ASSIS ISSA | 
[SUBROUTINE WILL CONVERT 'N' BCD WORDS (SEPARATED VIA COMMA'S) 

[WHICH WERE STORED IN A TABLE VIA 'TTYIN' TO OCTAL AND STORE THEM. 


FI II IIT TOR TIT TOTTI TOTO IORI TOI IIIT IOI III III IAI SAIS IISA ISS SISSISISSSSSISSSSSCSIONC 


022430 XBCDBIN: SAVREG SAVE REG.'S 
015330 MOV ;SETUP ASCII STORAGE TABLE 
aeceee ; TABLE FOR STORAGE OF CONVERTED WORDS 


C 
BCDBN1 : : 


:REG. TO STORE rage TOTAL 
C 2 MP. OR 

032214 BCDBN2: : : oe 
032214 CHRC :DECREMENT CHARACTER COUNTER 
000054 MPB 71S CHARACTER = TO ? 
YES, DECODE NEW WORD 


; TEST FOR LEGAL NO. 


000060 
000071 


BCDERR 
000360 STRIPE NO. TO BCD 
;SAVE NO. IN RO. 
SAVE CURRENT TOTAL 
;NX2 


INXS 
sNX8 
>NX9 
7NX10 
sN+NEW NO. 

BR BCDBN2 

BCDEND: ;UPDATE BUFFER 
MO ;SAVE CONVERTED VALUE & SETUP TO SAVE NEXT 


032214 7F INISHED? 
NO, CONVERT NEXT WORD 


zYES, EXIT 
TEXT "ILLEGAL DECIMAL NO." 


RETURN TO THE MONITOR 
sOCTAL STORAGE TABLE 


R 
BCDERR: 


022572 
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4679 JRO IOI CII IOIOIIC I IOIOIICIIOIOIIOI I ITTT TAI ISAIAIISASNSISIIISS ISS SSISSISSISISISSSI SAS 
4680 PRINT DECIMAL VALUE IN R2 
4681 FR RCI IT TATA I IAI SISSISISISSSSISSSISSSISSSISS ISS SSS S SSSA AN. 
4682 
4683 022574 004737 021626 XBINDEC:JSR PC, TTYENB 
4684 022600 104002 SAVREG 
4685 022602 012703 177774 MOV #-4 ,R3 
4686 022606 012704 022712 MOV ADECPNT+2,R4 
4687 022612 012737 000260 022706 MOV #260,ZERO 
4688 022620 012701 177777 TYPT1: MOV #-1,R1 
4689 022624 005201 TYPT2: INC R1 
4690 022626 161402 SUB (R4) ,R2 
4691 30 10037 BPL TYPT2 
4692 022632 062402 ADD (R4)+,R2 
4693 022634 004737 022650 JSR PC ,DECOUT 
4694 022640 005203 INC R3 
4695 022642 001366 BNE TYPT1 
4696 022644 104003 GETREG 
4697 022646 000002 RTI 
4698 022650 005701 DECOUT: TST ki 
4699 022652 001006 BNE DEC1 
4700 022654 022703 177777 CMP #-1,R3 
4701 022660 001403 BEQ DEC 
4702 022662 013701 022706 MOV ZERO,R1 
4703 022666 000405 BR DEC2 
4704 022670 012737 000260 022706 DECI: MOV #260,ZERO 
4705 022676 052701 000260 BIS #260,R1 
4706 022702 104010 DEC2: TYPEIT 
4707 022704 000207 RTS PC 
4708 022706 000240 ZERO: 240 
4709 022710 022712 DECPNT: .+2 
4710 022712 001750 1000 
4711 022714 000144 10 
4712 022716 000012 . 

4713 022720 000001 1. 
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FEAR EREEKRKKRRERKER HE PASSER SSSSESASASSSS SESE SSE SSSR SRS SSE R SRS SRSA RASA SSSR SS 


;POWER FAIL HANDLER 


FERRER REE REE REE RE RE RR IREREEEEEEEREERERER REE EEHEERE ERE 


022722 010046 PWRFAL: MOV RO,-(SP) 
MOV 


0 
022756 000024 #PWRUP , a 24 


000340 : #340, -(SP) ; INHIBIT INTERRUPTS 
022770 MO #1$, -(SP) 
032210 : TEMP1,SP 
000024 (SP)+,a424 

(SP)+,R5 

(SP)+,R4 

(SP)+,R3 

(SP)+,R2 

(SP)+,R1 

(SP) +,RO 

;POWER UP DELAY 


001376 MONITR 


FI IIT III III KIKI KKK KIKI IK RRR EK EKER 


; SUBROUTINE TO SAVE 'R1=R5° ON STACK 


J ITI I TI TK IK IK IK IIR IR IKK KEKE EKER EEE ERE ERE EEE EK 


032164 XSAVRG: MOV (SP) +, SAVEPC 
MOV (SP) +,SAVPSW 

(SP)+,SAV2PC 

032172 rt a 


032172 
SAVOPC ,=(SP) 
SAVPSW,~(SP) 
SAVEPC ,=(SP) 
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TERA ERERE ERE EE EERE KERR ERE EERE ERE EERE ERR REE EERE EER 


; SUBROUTINE TO RESTORE ‘R1=R5" FROM THE STACK 


FI IIIT IIIT IK IEE ITI ICICI ICICI SCSI IE FE IIE IOFFICE TOTOIOIOT SOTO SOOT OSI OTIS OSI ISSA S MN 


023102 012637 XGETRG: MOV (SP) +, SAVEPC 
MOV (SP) +, SAVPSW 
(SP)+,SAV2PC 
032172 (SP)+,SAV2SW 
(SP)+,R5 
(SP) +,R4 
(SP)+,R3 
(SP)+,R2 
(SP)+,R1 
032172 SAV2SW,-(SP) 
SAV2PC ,~(SP) 
SAVPSW,-(SP) 
SAVEPC ,~-(SP) 


9990S IORI IIIA III IIIS ISAISSISSISSISSISSSISISSI SAS SSS AI AASI IAI IA IAI IA IA IAS ASSCM. 
; SUBROUTINE TO WAIT FOR AND ASSEMBLE CHARACTERS INPUT 
;FROM THE KEYBOARD INTO OCTAL NUMBERS. 


SRR RR la lekki keke Rh l lela e hehehehehe Re lalehe hahahahahahaha hahahehelelelelehahelaheiaheleleieleleheleieleleleleleheielelelclelelelelslelclelel 


023154 


023156 XASEMB: TTYIN ; CHAR."S FROM KEYBOARD 
005000 CLR RO 
032214 — ; Hl CHARACTERS ENTERED 
<o x 
EXIT 


;NO 
015330 # INBUF ,R1 SET UP — BUFFER POINTER 
023232 J PC,STRIPN STRIPE N 
XASEM1: z V 4,RO ; RETURNS NHERE IF ONLY ‘1° NO. 


WORD2: } : ;ADVANCE POINTER PAST COMMA 


R 
032214 ;DEC. CHAR. CNTR. 
; COMMA LAST CHAR.? 
NO, SAVE 1ST NO. 
000002 A SET UP STACK TO EXIT 


: R4 
000054 C ;CHAR. = COMMA? 
WORD s YES, SAVE 1ST NO. 
000370 " NO, STRIPE NO. TO OCTAL 


032214 7 FINISHED? 
;NO 


032274 C S CHARACTERS WERE ENTERRED 
:YES, EXIT 


023272 


DIR REE EEEEEE EERE EERE EEE 


; SUBROUTINE TO OUTPUT CURRENT SWR VALUE IF USING SOFTWARE 





CZPMACO PDM70 DIAGNOSTIC 1580 


CZPMAC .P11 19-JAN=78 1 


023274 022737 


023346 
023350 


000176 
000176 


032214 
000176 


MACY11 30A(1052) 
SUBROUT INE 


001352 
001352 


D 
 ehegbedies 09:11 


11 
PAGE 


112 
SEQ 0133 


7SWR AND TO ASSEMBLE CHARACTERS INPUT FROM THE KEYBOARD 
3;TO FORM THE NEW SWR VALUE. 


OSES SESSSSAESSASELESLS ESAS ERS RSE R RRS R RRR RRR RRA R RRR RR RRS E ODS 


CMP 
BNE 
CMP 
BN 


UPDATE : 
UPDAT1: 


ASWSWR, SWR 
A 
ASWSWR, SWR 
1$ 


;USING SOFTWARE SWR? 
:NO=BRAiICH 

;USING SOFTWARE SWR? 
:NO-BRANCH 

ZYES=PRINT ‘'SWR="' 


;PRINT VALUE 
PRINT ‘NEW SWR="" 


;WAIT AND DECODE 
;WAS A NEW VALUE © pvpatieste 


sNO=SAVE OLD VALU 
7; YES-USE NEW VALUE 


sEXIT 
[WAIT FOR CR 
;EXIT 





an 
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TORRE RSSLRSAALASESLSLE RSS RRSS RRR RSS S SRR SRS SA RASA SASSER RRR SASS SRR SDS OS 


"SBITL MESSAGES 


FARRAR ERE RARER ERREERERERRRREREKKKEEEREEEARERRRE REE EK 


-BYTE 
050132 TITLE: .ASCII ;%%CZPMACO PDM-70 DIAGNOSTIC TEST a; 


023352 


020124 
054524 HEADER: .ASCII ;%TYPE IN THE FOLLOWING TO RUN THE DESIRED TEST:%; 


051505 035124 


031467 030070 TSTLST: .ASCII ;M7380A, M7381A, M7381E, M7382A, BCDIO, M7383A, M7383C, M7383R, M7383G, 


3%M7384A, M7384E, M7385A, M73851, M7385T, M7386A, M7387A, M7388A, ; 


7M7388F ,%4M7377A,M7378A, SUBX, RECBUF, TRNBUF, SEND, RUN,@; 


6 052522 
023772 026116 





aon 
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CZ 


PMAC .P 


023775 


024076 


024126 
024127 


024202 
024205 


024226 


024227 
024234 


024252 
024257 
024264 
024272 


024275 


024332 


027124 


042045 


051525 
042523 


047511 


052116 


040045 


030514 
053103 


053517 


051105 


051106 


051505 
050115 
022456 


042524 
042104 
100 


043125 


040440 


MACY11 30A(1052) 
MESSAGES 


047111 


037516 


047522 
052504 
051505 


020061 


022456 


040511 


052123 


020061 
052522 
047522 


042514 
051124 
020117 


046517 


020124 
042514 
100 


052123 
027122 


042104 


MESO: 


MES1: 


MES2: 


MES3: 


MES4: 


MESS: 


MES6: 


MES7: 


MES8: 


MESS: 


MES10: 
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-ASCII 


eASCII 


-ASCII 


-ASCII 


-ASCII 


ASCII 


-ASCII 


ASCII 


-ASCII 


-ASCII 


-ASCII 


;%USING SERIAL I/0 INTERFACE OPTION? a; 


;CONTROL MODULE TEST. %a; 


3%DL11 RECVR. BUFFER OVERFLOW. %a; 


SERIAL I/0 ADDRESS TEST. %a; 


3DL117 OVERRUN ERROR.@; 


;%ILLEGAL TRAP TO a; 


; FROM a: 


Z%TEST COMPLETE. %a; 


s%ZTEST ADDR.? a; 


;BUFFER IS EMPTY.@; 


;%RE-SET MODULE ADDR. 


TO *17"(OCTAL). 


SEQ 0135 





> rPrrrrrrrrn» Om 


> b 


mmm mmnmmmmmmmnmmMnNnNMn NNN NH nnn > > Bb BYP Bb LY Bb YP Lb b YL YP YP LY b 
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024710 


024714 
024722 


2 
024760 


027122 


027124 
051445 


044124 


040507 
047514 


053523 
053040 


052040 
023467 
045101 


020104 


043123 
027110 


044501 


047171 
023527 
052111 


053111 
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020117 
047450 
027051 
042101 
044523 
051505 


041440 


047101 
047515 


042524 
042522 


©0077 
02007? 
020116 


040522 
051505 


046120 
034456 
044527 


023440 
040056 
044103 


027105 


MES14A: 


-ASCII 


A/D ADDRESSING TEST.a@; 


3A/D CALIBRATION TEST.@; 


;%BREAK AT SCOPE a; 


%INSERT D JUMPER TO INHIBIT "EOT" AND 


;%REMOVE JUMPER, CLR MODULE AND ENTERQ; 


A/D REPEATIBILITY TEST.@; 


SAV5F? a; 
sCH.? @; 


GAIN ACCURACY TEST. %a; 


Z2SUPPLY +1.990V WITH a; 


;GAIN ‘LOW’ .@; 


SWITCH VOLTAGE NEGATIVE.a; 


SEQ 0136 
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5008 
5009 02476) 107 044501 020116 MES22: .ASCII ;GAIN “MEDIUM'.a; 
5010 024766 046447 042105 052511 


5011 024774 023515 040056 


5013. 025000 040507 047111 023440 MES23: .ASCII ;GAIN ‘HIGH'd; 
5014 025006 044510 044107 040047 


5016 025014 051445 050125 046120 MES24: .ASCII ;%SUPPLY +.1990V WITH _; 
5017 025022 020131 027053 034461 
5018 025030 030071 020126 044527 


5021 025042 051445 050725 046120 MES24A: .ASCII ;%SUPPLY +0.01990V WITH _; 


5025 025072 051445 050125 046120 MES25: .ASCII ;%SUPPLY +0.000V.a; 
5027 025106 030060 027126 100 


5029 025113 045 047111 047503 MES26: .ASCII ;%INCORRECT GAIN!@; 
5030 025120 051122 041505 020124 
5031 025126 040507 047111 040041 


5033 025134 020045 046040 053517 MES27: .ASCII 3% LOW AVG _HIGHa; 
5034 025142 020040 020040 053101 
5035 025150 020107 020040 044510 


1 
ate 025161 045 042522 047503 MES28: .ASCII ;%RECOVERED FROM POWER FAILURE - BY GOLLY!@; 


5043 025224 047507 046114 020531 
5044 025232 100 


5046 025233 102 042103 044440 MES29: .ASCII ;BCD INPUT ADDRESS TEST.@; 
5047 025240 050116 052125 040440 

5048 025246 042104 042522 051523 

5049 025254 052040 051505 027124 

5050 025262 100 


5052 025263 045 047515 052504 MES30: .ASCII ;ZMODULE ADDR.? a; 


D 
D 
D 
D 
D 
D 
D 


. 1 
5055 025303 123 052105 041440 MES31: .ASCII] ;SET CUST. SW.'S _; 


mmmmmmmm 


5058 025324 046101 020114 047117 MES3IA: .ASCII ;ALL ON WITH INPUTS HI.@; 


100 
5062 025353 101 046114 047440 MES31B: .ASCII ALL OFF WITH INPUTS HI.@; 
5063 025360 043106 053440 052111 
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020110 047111 052520 
044040 027111 


020117 046101 MES31C: .ASCII ;TO ALTERNATE ON & OFF'S.@; 
052101 
023040 
051447 


047117 MES31D: .ASCII ;ALL ON WITH INPUTS LO.@; 


SEQ 0138 


: 
047440 MES31E: .ASCII ;ALL OFF.@; 
047111 MES32: .ASCII ;BCD INPUT EXERCISER TEST.@; 


042524 052123 
020104 952517 tis ;BCD OUTPUT ADDRESS TEST.@; 


051505 027124 
054105 046501 Box 3 XEXAMINE OUTPUT LINES FOR _; 


043040 


047514 ; sALL LOGIC 1'S.a; 
023461 


051195 Pro :REVERSED _; 
:%SCOPE FOR "OUTPUT DONE H&L’ (TYPE “R TO RESTART).a; 


i=) 


;%KEYBOARD/DISPLAY MODULE ADDRESS TEST.a@; 


3& 


051505 
040440 : 37'S AND LEAVE THE INPUTS OPEN.@; 


050117 047105 


ee ee ee ed ed od 
WOWNAWEWM-O 


026032 
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023461 Ooo és thy ds MES4OA: .ASCiI ;1'S AND GND ALL INPUTS.@; 


MES4OB: .ASCII ;ALTERNATE 1'S & 0'S.a@; 
023460 
040056 MES41: .ASCII ;0'S.a; 
047440 MES42: .ASCII INT. OR EXT. SYNC.? a; 
027124 
027103 


044440 MES43: .ASCII ;BCD 1/0 TEST.@; 
051505 


040522 MES44: .ASCII ;CHARACTER 1/0 ADDRESS TEST_ ; 


3D/A ADDRESSING TEST.@; 


;%SCOPE FOR ‘PROG L' & ‘FLOP L" LO.a@; 


;SCOPE FOR 'PROG L* HI & ‘FLOP L* LO.a; 


MES48: . :SCOPE FOR ‘FLOP L* HI.a; 
MES49: . :SCOPE FOR ‘FLOP L* LO.@; 


MESSO: . CHECK CH. 'O* OUTPUT FOR 


051117 


041505 020113 MESSI: . CHECK CH. ‘1° OUTPUT FOR 
020056 
052517 
043040 051117 
026512 057440 
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027174 
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047131 
047503 
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040126 


052123 
040526 


023440 
054514 
054105 
046101 
027103 


042520 


042510 
020123 


042515 


044440 
051505 


020061 
026056 
037456 


052122 


042522 


-ASCII 


78. 88Vva; 
;D/A EXERCISER TEST.a; 


D/A VALUES(X,Y)? a; 


j%SET ALL DATA SW."S TO '0'.@; 
;SUPPLY AN EXTERNAL SYNC.@; 


;SCOPE FOR THE SIGNAL ‘DATA READY, AND CHECK %; 


3CH."S 'O & 1° OUTPUTS FOR 5 USEC RISE TIMES.@; 


3TTL 1/0 TEST%A; 


;DL11 ADRS., VEC.? a; 


INSERT THE M7387 READ-IN MODULE & INITIALIZE SYSTEM. %a; 


7‘ PROM OK'' REMOVE THE M7387. %a; 


SEQ 0140 


SBBRSSRBARAAARARAARARAR ARR RRR RRA RRR RRR RRR RRR EEE DOOD 
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027202 


027272 
027274 


027316 
027323 
027330 
027336 


027337 
027344 


027350 


027614 


19-JAN=7 


047515 


8 14:50 


042526 


052123 
042514 
042504 
020114 
037477 
047111 
042523 
044506 
040056 
052520 


053440 
022456 


042117 
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052040 


042524 
037456 


040507 


044055 
027051 


046105 


020124 


044515 
044506 
040504 


044522 


051505 
047111 
044514 
046504 


052040 


052123 


020124 
051505 


040470 


046125 


ME S66: 


ME S67: 


ME S68: 


ME S69: 


MES70: 


MES71: 


MES72: 


MES73: 


MES73A: 


MES74: 
MES75: 


MES76: 


MES77: 


ASCII 


ASCII 


-ASCII 


-ASCII 


-ASCII 


ASCII 


SERIAL 1/0 INTERFACE TESTZa; 


REMOTE DST.? a; 


; ILLEGAL DECIMAL NO. ??@; 


3 CIN“HOUSE) .a; 


3 (FIELD).@; 


3; INPUT DATA, TERMINATE TEST W/EOT.%a; 


EXAMINE "FIFO" DATA.@; 


ENTERING THE DISPLAY TEST, ; 


;RE-INITIALIZE PDM70.a; 
sECHO TEST, _; 

;STORAGE TEST _; 

;RESET ADDRESS %@; 


3M7378A FOUNDATION MODULE TEST. 


SEQ 0141 





FE PPR RR ERR ER ER PREP RE RRR E EEE PPP ee errr lal mere 
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027622 


020105 
2 


040045 
022445 


042524 


052111 
4522 


047117 
051440 
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052123 
Be 3s3 MES78: .ASCII ;PUT SCOPE PROBE ON PIN 78 ._; 


033440 
042536 fo ;USE *E TO EXIT FROM SUBTEST. @; 


3M7377A REMOTE SERIAL I/O TEST. %a; 


027124 


042514 yr ; SELECT 012 (LINEFEED) SWITCH "V*(VARIABLE TERMINATOR) .<CR>@; 


037122 
041440 $-* HIT CARRIAGE RETURN TO CONTINUE. %%a; 


sRESET MODE SWITCH. %a; 
027110 
046103 a SET CLOCK 3 ON CLOCK MODULE TO 100 MILLI SECONDS.%%_; 
020063 


051504 
052105 ti % 34% SET SWITCH 1 OF SWITCH P TO ON. 4a; 


020056 
051124 fe 3%% STRAP OUT EOT<CR>%a; 


SEQ 0142 


Fafefof-f-f-f-f-! 


x 4 
= 


M3 
M3. 
M3 
M3 
M7 
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5344 030312 050101 047440 052125 
2440 052117 041474 
040045 


5347 030332 022445 042522 047515 MES87: .ASCII ;%%REMOVE EOT JUMPER<CR>@; 
030340 2526 


SEQ 0143 


5351 030362 042522 042523 020124 MES88: .ASCII ;RESET MODULE ADDRESS <CR>%Za; 


5354 030404 oe1335 saan 7 051103 

5356 030415 015 051412 051127 MES89: .ASCIZ<15><12>/SWR=/ 

5358 030424 905018 047012 053505 MES90: .ASCIZ<15><12><12>/NEW SWR=/ 

5360 030440 023440 052123 023530 ERR1: .ASCII ; ‘STX' WASN'T RETURNED. %a; 
030446 053440 


5364 1 

5365 

5366 030471 040 044504 047104 ERR2: .ASCII ; DIDN'T ENTER ADDRESS MODE. %a; 
5367 030476 052047 042440 052116 


5370 030520 042117 027105 040045 


5372 030526 042040 052101 020101 ERR3: .ASCII ; DATA ERROR. %a; 
5373 030534 Se hott 047522 027122 


04004 
5375 030544 040440 042104 042522 ERR4: -ASCII ; ADDRESS ERROR IN 2ND PROGRAMZQ; 


030566 
5379 030574 043517 040522 022515 
3060 00 


5381 

5382 030603 040 042447 052117 ERRS: .ASCII ; ‘EOT* WASN'T RETURNED. 2a; 
5383 030610 040527 047123 

5384 030616 052047 051040 052105 

5385 030624 051125 042516 027104 

ry 030632 040045 


5388 030634 030440 052123 050040 ERR6: .ASCII ; 1ST PROGRAM WASN'T RECIRCULATED.%a; 


2522 
5392 030664 041522 046125 052101 
5393 030672 042105 022456 100 


5395 030677 040 040504 040524 ERR7: .ASCII ; DATA PARITY ERROR. %@; 
5396 030704 050040 051101 052111 

5397 030712 020131 051105 047522 

rte. 030720 OU2eri22 040045 


PR 
PR 
PR 
PR 
PR 
PR 
PR 
PR 
PR 
PR 
PS 
PU 
PU 
Pw 
Pw 
QM 
QU 
RA 
RA 
RA 
RA 
RE 
Re 
RE 





CZPMACO PDM70 DIAGNOSTIC TEST 


CZPMAC .P11 
030724 


031320 
031321 


19=JAN=7 


042516 


052947 


8 14:50 


046114 
042040 
043130 


054523 


022456 
051447 
042504 
054047 


020117 
022456 


051505 
046440 


027104 
042523 
044440 
047062 


042440 
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043505 
052101 
051105 


023516 


047131 
040514 
020047 
047514 

100 


047104 


042504 
054124 


027124 
042117 
042104 
020130 


026105 
020124 


044522 
047457 


020104 


052116 


ERR8: 


ERRY: 


ERR13A: 
ERR14: 


-ASCII 


-ASCI: 


-ASCII 
-ASCII 


on TY 


SEQ 0144 
; ILLEGAL DATA XFER%@; , 
fi 
Fi 
; "SYN' DELAY 'X* TOO SHORT. %a; Ri 
i 
f 
F 
F 
; "SYN' DELAY ‘X* TOO LONG. %a; ; 
F 


; DIDN'T ENTER DATA MODE. %a; 
; "STX" DIDN'T CLR DEST.%a; 


; A MODULE WAS ENABLED WITH ADDR. 


: "Os 

: ETX DIDN'T CLR SOURCE, %@: 

: EOT WASN'T STRAPPED OUT. %a; 
; ETX WASN'T RETURNED.@; 


; SERIAL 1/0_; 


; 2ND PROGRAM DIDN'T ENTER DATA MODEa; 





ee eee 


CZPMACO PDM70 DIAGNOSTIC TEST 
CZPMAC .P11 


031350 
031356 
031364 


031702 
031706 
031712 
031715 


031752 


19=JAN=78 


051105 
020101 
100 


022477 
022445 
026445 


14:50 
042040 
047515 


047103 


040056 
040056 

100 
025440 


046101 
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052101 
042504 


051124 


042117 
042040 


027116 


040524 
040515 
047522 


052117 


022456 


025453 


036505 


ERR19: .ASCII 


ERR20: .ASCII 


ERR21: .ASCII 


ERR22: .ASCII 


ERR23: .ASCII 


ERR24: .ASCII 


ASTRIC: .ASCII 
QMARK: .ASCII 
DOT: -ASCII 
DASH: ASCII 
SCALE: .ASCII 


; CNTRL MODULE DIDN'T ENTER DATA MODE.@; 


; NO DATA RETURNED WITH EXT. SYNC.a@; 


;%ILLEGAL EXTERNAL CONVERSION.@; 


; DATA FORMAT ERROR.@; 


REMOTE CLEAR LEFT GARBAGE IN MODULE F IFO%%a; 


CLEAR LEFT GARBAGE IN MODULE FIFO.%%a; 


3*a; 
37%.a; 
3%%.a; 
3%-a; 


TH ttteeeeese teteeeeee (SCALE=_; 


SEQ 0145 





S 
S 
S 
S 
S 
S 
S 
S 
S 
S 
S 
S 
S 
S 
S 
S 
s 


mtr 


IREATAT A AtAITAIATAIAIAIA 
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71MV_; 
:1000V_; 


om 


031753 053115 137 X1MV: ~——«.ASC 
030060 


053125 x100UV: .ASC 


I] 
I] 
052460 057526 x10UV: ye 


053111 022451 XDIV:  .ASC s Pavsix a; 


051117 047514 XLOW: .ASCII ;%ORLOW a; 
043511 XHIGH: .ASCII ;%ORHIGH a; 

032025 00 END: ASCII 5a; 
032026 SLASH: .ASCII ;\@; 
032030 UPAROW: .ASCII ;“a; 
032032 CRLF: .ASCII ;%a; 
032034 022445 100 CRLF2: .ASCII ;%%a; 
032037 104 030503 040045 MESDC1: .ASCII ;DC1%a; 
032044 041504 022462 100 MESDC2: .ASCII ;DC2%a; 
032051 104 031503 040045 MESDC3: .ASCII ;DC3%a; 
032056 041504 022464 100 MESDC4: .ASCII ;DC4%a; 
032063 123 054124 040045 MESSTX: .ASCII ;STX%a; 
032070 054523 022516 100 MESSYN: .ASCII ;SYN%a; 
032075 123 044117 040045 MESSOH: .ASCII ;SOH%Za; 
032102 044523 040045 MESSI: .ASCII ;S1%a; 
032106 047505 022524 100 MESEOT: .ASCII ;EOT%a; 
032113 105 054124 040045 MESETX: .ASCII ;ETX%a; 


(AILNMIAtTALALNMMN AM ta 


(AITAIAIAt(A 


bud UI MIMIMIMIM*ALTAIMALRIMINMNIATAIAIAIAIAIAIAIA 
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032120 


032230 
032300 
032302 
001376 
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© WTI I TI HIT KEKE EK EKER 


“SBTTL SOFTWARE 'SWITCH' ADDRESSES 


PR haha lahalahahahahahehaiahalehahalahalaheinialahahahelehehelelelelelahelelahelalelehelshaleieielsleieleieleleleieleleleiclcioleleisieieiela! 


CONTAINS THE "CNTRL R' RESTART ADDRESS 
CONTAINS THE "CNTRL A‘ RESTART ADDRESS 

zA/D OFFSET 

sSERIAL I/O SWITCH, SET IF SERIAL INPUT USED 
sSTORAGE OF CURRENT MODULE ADDRESS 


; TEMPORARY COUNTER(REMOTE SER I/O). 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


: ©. @ 


SEQ 0147 
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48384 
1294 


1314* 1315 
1644 


104026 
017234 


005154 
017220 






014644 





LL 


4643* 46754 


ee ee ee 


| 


005440 
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CZPMAC .P11 
005444 


032214 
021524 
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1394 1399 
1431 1571 


3663*  3691* 3692 3703 3705*  4068* 
4812* 4834 55874 
44134 


3716 3739 3798 4540 55298 
7898 
5154 


1841 1855 1869 1883 1897 


* 1853* 1867* 1881* 1895* 


2001 


4070 


1910 


1908* 


4647 


1923 


1921* 


4649* 


1945 


1941* 


4668 


1951 


1947* 


SEQ 0149 


4789 


19634 


1963 





fata! 


GG Asatte 


>< > DK KK DK OK DK DK OK OK OK OK OK OK OK KK OK OK OK OK OK OK OK OK OK 
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1826* 1840* 1854* 1868*  1882* 1896* 


1965* 19744  2017* 
19754 


1350 2581 
3183 3338 


4097 4420* 55674 
017277 3581 3584 3629* 3630 
032146 3995* 4118 4127* 55684 
015064 


ERREXT 020620 
ERRMES 017136 


1909* 


1922* 


1942* 


1948* 


4024* 


SEQ 0150 
19734 


40294 
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030440 2 53604 
2090 2303 2364 3091 
54214 


829 834 841 882 917 951 971 1215 
2375 2830 2931 53728 


2050 2127 2402 2638 2775 3343 53824 

53884 

2408 2654 54004 

2211 2216 2543 2975 2993 3309 3786 3950 4092 


3728 3749 3751 


3652* 


3493 


0 
032142 3799» 3807* 4547" 55664 
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014014 
3375 33874 


3413* 


55744 
36464 


16734 
1730 3718 3840 3869 4100 4140 4332 


3852 38744 


3829* 38774 
585 4157 


39894 


015330 12 1695*  1696* 37554 4191 
014740 


2552 


55654 
4311* 4312* 
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3077 3119 3147 3170 3185 3282 3312 3320 3325 
3531 3589 3593 3596 3984 4105 4128 4624 
016114 3 3 38 38734 


792x 1570* 1659 1661* 2034* 2760* 55904 
3832 3834* 38754 


2279 3067 3407 49494 


50834 
025557 1105 1131 50884 
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025612 


51934 


1363 1619 2319 2417 2594 2731 3215 3504 


03006 
030126 
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030152 53274 


3100* 3211 55634 
494 5 5 


2732 
3454 
1384 1413 2509 2567 4589 4619 


248 250 4741 
668 680 3565 


NULL 1 04023 
OBCDT1 004422 
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55614 
55704 
1538 55954 


3935* 
3775 3778 3781 
4604 


104012 


4460* 4476* 55584 


» 56 3 4 
RECBFO 016234 8 8 91 4 9 5 1276 1514 
3894* 3900 
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4558 4575 
45584 


022224 


016224 1256 1690 2124 2162 = 2178 ~—s 2305 2399 2820 
017124 ? 3377 3893x 39044 3938 


39534 
3948* 


940 1207 1296 1333 1687 2084 
czas 3024 3074 3084 3140 3163 


55644 


55914 
2083* 2282* 2357 2568* 2707* 3070* 4241 4255* 


3711* 55884 
55594 


3818 3848 4061 4137 4326 4458 4498 


032170 
032172 
037715 
104001 
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CZPMAC .P 


SCOPEB 


STDR10 


genes 


021502 
104035 


000017 
032132 
032026 
014470 
017664 
000001 
017231 


104025 


013170 


19-JAN=78 14 


MACY11 30A(1052) 


C 
20-JAN=78 09:11 


13 
PAGE 138 
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929 
95 


21874 
29454 


958 


978 


4315* 


30634 


997 


1087 1113 «1140S ‘1271S: 1286 
1865 1879 1893 1906 1919 
2314 2386 2414 2507 2562 
2898 2955 2967 = 3063S 3110 
5569# 
1238 1382 «= 1412,—S«*1569 1739 
3248 4586 
1291 2051S 2173, 2191 2465 
3372 339% = 3424 «= 3461 3586 
2206 2246 «2454 = 52883296 
983* 1002* 1036* 1037* 11728 
2160* 2297 2633 2649" 2684* 
4435* 
4O007# 4160* 4403s 


SEQ 0158 
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013207 


3165 


649 2232 2545 3017 3285 3534 


001352 1034 1042 1326 1388 1393 1655 
4083 4095 4207 4218 4230 4232 


001354 
4836* 


3064 


2540 4207 


— 
= 
- 
— 
= 


22134 
TAGIKA 29934 
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010476 
23184 
32104 
32114 


2257 22664 


ONMSWON-oOOoO> 
WN00 0 ££ CO NOOO 
te RWRRRR 


oul 
W100 


ae ee ee ee ee ee 
NM 
& 


3 
3 
3 
3 
0 
1 

1 

1 
2 
2 
2 
22 
ce 
999 
0 


55854 
4104* 4115 4117* 55714 
2376 23864 


29834 
31374 
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TGIPB 013534 3149 
TGIPC = =©.013550 3157 
TGIPE 013610 3173 
TGIPF 013622 3187 
TGIPG 013636 3201 
TITLE 023353 258 
TKB 001344 2024 
TKS 001342 2014 
TKSFLG 021264 181 
032156 4169* 
TPB 001350 2044 
TPS 001346 2 
TRANPT 017: 4039* 
TRANO 017350 40664 
TRAN1 017374 4067 
TRAN2 017462 40904 
TRANS 017426 40814 
TRANG 017526 4076 
TRANGA 017540 41054 
TRANS 017554 4080 
TRANSA 017602 41224 
TRANSB 017612 4121 
TRANSC 017622 4119 
TRANSD 017630 4123 
TRANSE 017636 4122* 
TRANSF 017642 4126 
TRANSG 017644 4122 
TRAN6 017650 4084 
TRAN7 017442 40854 
TRNBFO 017670 459 
2097 
2809* 
2941* 
4625 
TRNBUF 022232 375 
TRNEND 020372 471 
TRNEXT 017476 4082 
TRNSMT 017330 4041 
TSTABL 002076 333 
TSTLO 015752 3828 
TSTLST 0234 
TSTNUM 032206 4210 
TSTTKS= 104017 1294 
TSTIA 011172 2343 
TST2ZA 011316 2392 
TST2B) 011342 2403 
TTLAD1 011441 2426* 
TTLAD2 011445 2427* 
TILTST 011400 24414 
TTYENB 021626 1029 
TTYIN = 104013 1254 
1754 
1927 
4342 
TYPECL 021770 4483 
TYPEIT= 104010 122& 
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4443» 


41294 


588* 


4313* 


591 


4354* 


598 
2175 
2905* 
3374 


55844 


607 


2177* 
2906* 
3376* 


41444 


SEQ 0161 


1634 
1914 
4254 
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015320 37528 
4 4485 4491 


48234 
1604 1612 


4824 515 5164 545 576 5778 616 
789 7904 


3996 40484 


ANGN 
KRECRO 016130 
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XSAVRG Reacts 


3671 3754 


032614 964 1094 152A 293 
549 557 566 


55944 


324 


SEQ 0163 
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481 


481 


000 


ERRORS DETECTED: 0 
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515 545 576 616 632 709 


515 545 576 616 632 709 


CZPMAC .BIN, CZPMAC.LST/CRF/SOL/Ni : TOC=CZPMAC.11 


RUN-TIME: 5 13 2 SECONDS 
RUN-TIME RATIO: 113/21=5.3 
CORE USED: 13K (25 PAGES) 


789 


789 


SEQ 0164 





